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ERPr-IT@GRIAL 

Merry Christmas and a happy mew year to all. I would especially like 
tu thank all the regular contributors, and in particular Anne and 
Gavin Flower, for the tremendous amount of creative energy and support 
they provided. Many others sent in splendid contributions ranging 
fram a few lines to full blown articles. It is on these that Beeblet 
te built. 
Of course, the break will give you all that little bit of time you 
twwd to finish that contribution you've been meaning to send in for 
Jleeblet all year. Won't it? This year seems to have sort of snuk 
past on me: ever since I took over this mag ‘nominally anyway) all my 
other interests / commitments seemed to have expanded at a geometric 
rate as the year progressed ~- that, and the silly season; 15 why no 
oie could get me at home in the evenings in the fortnight or so 
preceding Beeb production weekend, 

HELHHHHKREEHHALHAREHRHHE HER HHRE RHEE ER ES 

AGM. 

The next Beeblet will came out in February fearly February if I get 
enough material) so 1 will remind you mow to think about things you 
wold hike to see on the A,G.M. agenda. 

LHELHKHFEHHHAKHLHAHRKAHH HHH EHRKEREH EERE 

ATTENTION TEACHERS 

A lot of fuss was made about concessions for students, but as far as I 
Kiiaw only one schocal has taken up the special student membership 
(ontession which was approved at the last AGM. 

EESHEHHER EHH RARHAHHHEREREEEHRRE HEHE ERES 

COMMUNICATIONS 

| Know that the various branches around the country are organising 
workshops, seminars etc. Eq. Christchurch has what sounds like an 
interesting series on Robotics. Could someone write these up for the 
mag’ The exchange of Knowledge and ideas is after all the basis of 
our lub, 

HHKKRHHHRREK SHREK AAHRH ERR RERHEHERER ES 

SERVICING 

As the Aptec add in this issue suggests we have a new arrival on the 
Wellington BBC servicing scene, strongly endorsed by Barry S, of Lower 
Itutt. Aptec are not an accredited BBC service agent at this stage, 
but may seek accreditation if demand warrants it. 

HXHKLEHK HH KHAEHEH RHEE EREREERERERRER EERE 

COMPETITION 

The only thing approaching an entry in the create an educational 
program competition was G.C,F.’s mental arithmetic. I quess it wins? 

HKHHHHHE RES E RH RALHER EH RHER EER REERHEREEE 

THE END 

Well, that’s how stories are supposed to end. Following this effort, 
my house ts in’a state of “tdtal chaos, my body is not far behind, and 
pyen the C-Itoh ground to halt for no apparent reason this morning { 
mud you, like me it has been running almost continuously over the 
last 72 hours.,.and its only a machine...). Enjoy the break, I will! 
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NEW BBC SOFTWARE PROGRAMS GAME CORE 
from 


Pitman Publishing 


This intnguing sofware gives you all tne information 
you need to wre simple and highly absorbing 
board games for your computer It includes three 
ready made games and o fourth 15 explained in 
detail as Q tutonal model There 1s an introduction 
fo gome trees and strategies, an explanation of 
coding. Ong guidance on wriling your Own Games 
programs 












Acomprehensrve yet mendly and versatile crawing 
program which can produce complex hgh- 
tesolution pictures In up to four Colours. with tne 
oility lo save alloptions to disc and tape allowing 
Ilotermodificalions Itenables chidren aged tom 
& upwards 16 create pictures. charts, maps and 
diagrams, and 1s sufficiently sopnisticated for usé 
by older children or adults 95 a Computer Aided 
Design tool 
























$49.00 


BBC Model  Cossetie Version 
SEN G563 240729 — 


$45.00 


ASTRONOMY 


Chidren of all ages ore fascinated by space and 
astronomy Tris software nas @ range of vwid 
graphical demonstrations which bring astronom- 
cai subjects to life Aimed at the 9-12 age range 
fhe programs include Phases of the Moon, Eclipses. 
Seasons ofthe Year. Planetary Motions. and Lander 
The hist four programs are demonstration models 
of commen astronomical phenomena shown In 
animated colourgraphics Landeris a gravilohion- 
ally accurate gome where aspocecrah has te be 
landed on several aifferent planels 


WHITE KNIGHT MARK II (ELECTRON) 


The amazing chess program that took joint fst 
piace in the home compuler section of the PEW BBC Model § Disc Vergion us 58.00 
Furopean Chess Championships. now versioned  iSB8NG 543 3246806: - 


for Electron 
BAC Model B Cassathe Ver! 
1S8N 0563326514 - “40 .00 







further information available from 


PITMAN PUBLISHING NEW ZEALAND LIMITED 
PO BOX 38-688 : 

28 FITZHERBERT STREET 

PE TONE 
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AROUND THE REGIONS 
DUN& DIN 


Martin McDowall reports that 4 group is slowing developing in Dunedin, 
through Whitcoulls. Give me contact names and numbers and! will list 
them on the back cover. 


INN VE ROARGILL 


Evan Cheyne reported last month that a local group was being 
established. Advantages of joining include: 

(a) Meeting other people with a common interest. 

(b) Solving problems you may be having with your equipment. 

{c) DEALS. - but NOT a swap session ter pirated software, 


CHRISTCHURCH 1935 PROGRAM: 
4 Feb Introductory class 
{e Feb " : 
4 March VIEW word processing 
{13 March Discs & Filing 
{ April Open Forum 
{5 April Sound & Graphics 
29 April Fundamentals of Assembly Lanquage 
2? May Good Programming Techniques I 
i@ June " " 2 
24 June Guest speaker T.B.A, 
Ss July Open forum 


Meetings every 2nd Monday 7pm at Hagley H.S. 


TOKOROF 


Anew Users Group! Meeting first Friday of each Month, Spm at Tokoroa 
High School. Comtact Brian ph. 67629 


NIGHT CLASSES next year there too: 

3S week basic computer studies; | 

so week intermediate computer studies 

Bach class 2 hours, each course $16.00 
Enquiries Brian Mycroft; P.O. Box 128, Tokoroa 
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BBC STARTER PACK 
Collins Software, $55-ish. Review copy supplied by Whitcoulls 
Reviewed by Anne F. 


"Someone should write an program fer people to learn how to write 
programs", 


Well, here it is. The Starter Pack is a 6@-page book and two 
cassettes in a vinyl folder. It is aimed at the complete beginner; to 
teach them to get the computer obeying simple instructions, and leads 
them to slightly greater complexities. 


The package is divided into 1@ lessons; each lesson is a book chapter 
and a program on tape. The user is expected to have the book 
alongside the computer, and the Keyboard only accepts the answer 
wanted by the program. So you cannot type in "RUN" if it is wanting 
"NEW" or "LIST" or Space Bar! You write programs, edit them etc as 
you normally would, BUT you are still within the chapter program! It 
i5 a good approach for beginners afraid of making a mistake - an 
incorrect response. often doesn’t even appear on the screen! 


Most of the programs are in Mode 7 and use colour, but illustrative 

raphics (other than Collins’ house logo on the title screen) are left 
o the last chapter (and barely mentioned there}. The pack could 
easily be re-written for another machine - not a PROC in sight, and 
Chapter 9 suggests that although GOTO is a powerful command: overuse 
can make your program difficult to follow and modify!’ PROCs are too 
alah a for this book, as are string handling, colour and graphics, 
sound... 


A beginner needn't then feel overwhelmed by the amount expected to 
learn. The lessons expect you tc ‘dry run’, ot predict the result of, 
each program and its variations, and the book has spaces for the 
result to be written before actually RUNning each program. This is a 
gcod approach, and should get beginners understanding what a computer 
is capable of doing, and how they can get simple programs written and 
werking properly before attacking the Keyboard. It is a 
well-thought-out teaching package. Its main fault was trying to load 
black 24 of the third program! On either side of the tape! 


@, When is a number not a number, but a string? 
A. When it’s a house number. 
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INITIATE ‘YOUR GRANDPARENTS 


Jean H. 


( Editor’s note: I couldn’t for the life of me remember who gave me 
the following article and listings - it pays to treat some editors as 
if they had a mental age of about 6 for the purposes of wording 
instructions and labelling everything..name address etc. I think Jean 
was the author...she did give me something). 


How do you show people who have never had contact with a computer what 
ane can do? They are probably over 15, so a fast moving game zapping 
aliens does not impress, and they are likely to feel that in the real 
world comouters must do something a bit more serious. You cannot show 
them anything too complicated, else they become even mere afraid of 
these modern devils. 


There is one topic to which the middle ie and elderly can relate - 
money. Here is a little program that calculates the return on 
investment, at compound rates of interest. It also gives a monthly 
savings scheme if you want to reach a target, say to buy a second 
oracessor for your Beeb. 


If they are still with you after that, you might try the one to tell 
how many ralls of wallpaper are needed for a room. 


NT 2 
DIE! ia an 





18 REM PROGRAM INTREST ,DATE 19.18.84 
13 REM A program about compound inte 
rest, and a monthly savings scheme 

20 MODE ? 

38 PROCinitia! 
188 REPEAT 
116 | PROCprintmenu 
128 «IF choices = 
$380 oF choice = 
148 «JF choicet = 
136 «IF choiced = "4" THEN PROCrate 
ino ))soIF choice# = "3" THEN PROCsaving 


168 UNTIL choice} = "4* 

165 ELS:PRINT:PRINT:PRINT:FOR [¥=] 10 
23PRINT TAB( 5) CHRS131 sCHREI4! :°GOODBYE*: 
NEXT I¥ 

178 END 

i7i: 


172 3 

208 DEFPROCini tial 

218 CLS:PRINT:FOR J=f 70 2:PRINTTAB‘S) 
CHR 141 CHREIS) ;"INTEREST*:NEXT | 

220 PRINTTAR.2, 1@}"This is a program t 
o calculate’’" how much an investment o 
 $186"’" would be worth at a given a 
e'’* of interest after so many years* 

238 PRINT:PRINT" It will also tell ye 
u how much"’" you have te invest te get 

$100°’" after so many years" 

248 PROCre turn 

258 CLO:PRINTIAB(2,3) "You will be aske 
d some questions’’" adout the interest 
rate you expect"’’* or the number of yea 
rs of the7’” investment” 

263 PRINT:PRINT" When you are asked f 
or your inttial"’" investment, give ap 
umber which "“" js less than 186° 

276 PRINTTABSE ,12)"Answer each questio 
n, then press RETURN" 

288 PROCre turn 

298 ENDPREC 

271: 

292 * 

388 DEFPROCpP intmenu 

318 CLS 


326 PRINT:PRINT"Chaose one of the opti. 
ons below," :PRINT"by pressing the approp 
riate Key,"sPRINT:PRINT‘Then press RETUR 
N" PRINT 


"1" THEN PROCamoun t 
"2" THEN PROCpr ine 
"3° THEN PROCper iod 


> 


358 PRINTsPRINTCHRS) 293" .° ;CHRS1355°A 
mount fron investment of 4109" 

352 PRINT:PRINTCHRS129;°2." :CHRS135;"H 
ov much to invest to get $100" 

354 PRINT:PRINTCHRS129;"3." ;CHRS135;°N 
umber of years to $188" 

356 PRINT: PRINTCHRS1 29; "4," sCHRE135;"R 

ate needed to get to $196" 

357 PRINT: PRINTCHRS 129 ; *5, 7 CHRS135;"S 
avings Scheme 

358 PRINT: PRINTCHRS1295°6. * CHRS135;"E 
nd the program 

366 choice} = FNinput("123456") 

378 ENDPROC 

370 $ 


376 3 

466 DEFPROCamount 

418 CLS 

420 PRINT: PRINT iprinc=198 

438 INPUT"What interest rate will you 

get, % "rate: r= rate/18é 

rate PRINT: INPUT" How many years for the 

investment “years 

458 amount = princ¥¢itr)“years 

452 amount = INT{amount#198)/188 

448 PRINT:PRINT:PRINT"You would get"3S 
PECS) CHRS1390:"S"; amount; SPE(9) "from 


$100" PRINT SPC(1) "at " CHRSI 
S4sratey" A": PRINTSPC(11) 3" in " sCHRS 
i33;years;" years" 


488 PRUCreturn 
498 ENBPROC 
49}: 


492 : 

38a DEFPROCEr inc 
318 CLS 

S28 PRINT:PRINT:amount = 188 

538 INPUT*What interest rate will you 
get, 4 “rate: rerate/108 

Sad PRINT 

348 INPUT" How many years for the inves 
iment "years 

258 pring =amount/{1tr)“years 

doz princ = INT(princ#sQ)/108 

548 PRINT:PRINT:PRINT*You would need ¢ 
o invest  $"3CHRSI30;princ:PRINT SPCC) 
B):"ta get $" samount:PRINT SPC(22) 5° 
at. = jCHRSIJ4jrates*A" PRINT SPC(21);" 

in" CHREIG3;years;" years" 


i & 


589 PROCreturn 794 5 

398 ENDPROC 797 

O91 3 BGG DEF FNinputt i$) 

O92 ft 81@ LOCAL ant, 1X 

688 DEFPROCperiod 829 ang=*" 

oie ¢ 838 REPEAT 

628 PRINT: PRINT:amount = 108 940  J%=GET 

638 INPUT*What interest rate will you g5_ IF INSTR(i$,CHRS(1%)) THEN and= 
get,% "rate:r=rate/168 CHREE I) 

635 PRINT semua 840 UNTIL I¥=13 AND LEN¢an$)=! 

648 INPUT"What is your initial invest 979 =ang 
ent $"princ B74: 

642 IF princ >99 THEN PRINT*Choose an 970 . 

654 funca= L06¢amount)-LOG<princ? 91@ REPEAT :PRINTIAB( 2,22) ;CHRS4131);° 

652 funch=LOGi+r) PRESS THE SPACE BAR TO CONTINUE" 


656 years= funca/funcb ryears = INT¢ye 958 9 UNTIL GET = 32:ENDPRDE 
ars%i8)/16 924 3 

668 PRINT :PRINT + PRINT'It would take yo 999 , 
uo * ;CHRS133;years;" years" :PRINT SPC46 pag DEFPROCsav ing P 


de"to get tron $";CHR$134sprinc’ sSPC¢! yag5 cls: PRINT: BRINT CHRS1 30 SPCCA) 1" 


Hy*to  $°sCHR$1 38; ancunt MONTHLY SAVINGS SCHEME 
688 PROCreturn 1818 PRINT:PRINT’This telts you how muc 
69¢ ENDPROC h you have'’"to save each® ;CHRS129; ‘mont 
691: bh, "sCHRSI35;"to reach your target'’"in ¢ 
— 692 3 he time you have available," 
708 DEFPROCrate 1626 PRINT:PRINT CHG 1294 hat is your 
718 CLS target 7 sCHRE135;" $":sINPUTamount 
728 PRINT: PRINT: amount=186 1838 PRINT: PRINTCARS 29H many years 
ent $*princ 1948 INPUT "Years ryears, "Months * mo 
732 IF princ)99 THEN PRINT*Choose @ AU ja4@ PRINT:INPUT"What interest rate can 
mber tess than 188°:G0T0 738 you get "rate 
239 PRINT 1978 months = 12*yearstmo 
748 INPUT"How many years “years 1998 pr = pate/12aa 


758 funca = LOG(amount)~LOG(pr inc) 1099 x= {+p 
768 funch=funca/yearssfunc=i@*tuncb = 4498 func = x¥(x*months ~f)/r 


778 pate=INT¢ {ORB4( func~$))/18 1126 saying = amount/func: saving = INT 
775 PRINT _(avings1885/198 
798 PRINT :PRINI"The rate must be -- 1125: PRINT 


sCHRS13B;rate;"A":PRINE"to raise you #0 4138 PRINT:PRINT CHR$136:"You need to 5 


7 $* 5 CHRS33; sprincsPRINT SPCG9}s"te ave $*:savingsPRINT CHRS1333° per month t 
$": CHRS129: amount: PRINT SPC(15)3* iN. o.peach your target™ 


"CHRS1 34: years" years” 1149 PROCreturn 


794 EROCre turn 1158 ENDPROC 
795 ENDPROC 


ii 


12 REM Program WPAPER 468 drops_needed =INT(totai_length/.9 


34) 
28 MODE 7:PRINT:PRINT . 
- NIT 416 = drops.per_roli =INT(18/height) 
FE a ae remnant=18-drops_per_rol | theight 


ay sth ent up li To cay «4138 Polls_usece INT( drops_needed/drops 
ee een ae aaa =drops_per_rolj#ire 
Se a seat ansers _ aH extra ACGrope.eeded op 
Et metres" :PRINT*and | decimal of a met arnt eee = Gp THEN ok ine @-pennan 
96 PRINTTAB(2, 20) CHR#131 ;"PRESS THE 


SPACE BAR 70 CONTINUE* 458 numremnants=rollsused -1 


= 468 PRINT:PRINT:PRINT CHRS$i29:"You wi 
ee: sat ois ae tH] need “srolls.used 3" rolls* 
908 = CLS:PRINT: PRINT: 476 PRINT CHRS129; "for the full lengt 


Mihat | h pieces" 
219 PRINTCHRS( 138) ;"What is the tota gag “pRINT:PRINTCHRS{29;"And there wi 


, 250" PRINTCHIS(1 30) *the room, withoy |} be "sextra;” metres left, *:PRINT CHRS 
t the windows." 129 ;"plus scraps 
238  PRINT:PRINT CHRS$(133):"Begin at a wdrops_needed =(window jength/ .53 


the edoe of one window, and” 


a 566 If windawheicht ¢ remnant THEN P 
ase PRINT CHR 39) measere right F ROCuse_scraps ELSE PROCho-scrans 


mn ., of8 IF more = 6 THENPRINT:PRINT CHR 

rane ie CHR 133) oS ANE Sea $129:"These will be enough for" :PRINT CH 

259 PORT CHR$(133)s"over all other jini areas above and below the win 
ows” 


windows which do net’ 
- 526 IF more = 1 THEN PRINT:PRINT CHR 
204 PRINT CHRSS133) ;"come Gown te th $129;"You will need one more roll" :PRINT 


* O48 INPUT total tength “CHRSI29"for above and below the windows 
278 PRINT:PRINT CHR#(131);"What is t 7 
he combined length of al}":PRINT CHRS(13 e ee eee PRESS THE 
1);*windows' 
DOR 548 REPEAT:UNTIL GET = 32 


298 INPUT window_length S58 UNTIL FALSE 


, 666 DEFPROCuse scraps 
380 PRINT:PRINT CHRS134°Uhat 1s the 618 JF widrops_needed < numremnants 


usual height of windows" 7 d 
318  PRINTCHRS134:"¢rom the ocr! THEN more =@ ELSE more = 


428 ENDPROC 
3286 = INPUT windouw_height 
338 PRINT:PRINT CHRS(S33);"What is t S7e TEFAMERG.Scraps 
he ceiling height? sINPUT height extra /4_drops neeceaty! hGoE. 
348 «FOR J=f TO 2BRB:NEXT:CLS eight) THEN more = 8 ELSE more =! 


358 796 = ENDPROC 


i= 
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HYrPER HOPPER 


Neville Tomlinson has, as promised sent in a magnificant game for the 
Christmas issue. Trouble is; it is so0 long {fills up all available 
memory) that I doubt whether we have enough enthusiasts to Justify the 
space it would take up in the mag. Soe what I propose is that we will 
supply it on tape to whoever wants it, at a mominal fee: either send a 
cassette and $1-@8, a disc and $2-88, or just cash ($3-@@ for 
cassette, $3-00 for disc). 


The game incorporates full MODE 2colour and graphics, and uses sound 
extensively as well. It incorporates a title page and a high score 
table. 


Neville says “You, as Captain of the “USS Hyper Hopper’, have been 
given the mission of eradicating the Moronotron Aliens Base." You 
must survive four screens of nasties. First, you use your hopper to 
Jump over enemy cities - its all over if you land on ome! Next you 
must ram your hopper into flying defences before they mave twice 
across the screen. As you hit each piece, &@ mean-lsoaking dragon 
builds up in the top left corner of the screen. If you successfully 
demolish all the pieces, the FIRE breathing Dragon starts moving. If 
you don’t manage to jump. onto his back, dodging the fire, before he 
gets halfway down the screen he will pounce on you! Once on the 
Dragon’s back you are carried to the Alien’s Base, with which you must 
dock and then demolish with a bomb. Success brings a choice of one of 
four ships te start again : but this time things will get tougher! 


H ¥Y P E o/F PE R 
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by Heville Tomiinson 
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THE if DAYS OF BEEBRBPMAS 
Tony W Napier 


On the first day of Christmas, my true love sent to me: 
A Beeb with a Three Month Guarantee. 


On the second day of Christmas my true love sent to me: 
Two Shugart drives and a Beeb with a Three Month Guarantee. 


On the third day of Christmas my true love sent to me: 

Three light pens, 

Two Shugart drives and a Beeb with a Three Month Guarantee 
On the fourth day of Christmas my true love sent to me: 

Four CALL-ing words, 

Three light pens, 

Eta 


On the twelfth Day of Christmas my True Love sent to me: 
Twelve Programs running 
Eleven printers printing, 
Ten loops a-looping, 

Nine Lists deleting, 

Bight Modems muttering, 
Seven Sprites a-sprinting, 
Six spokesmen lying; 

Five Gold ROMS! 

Four CALL-ing words, 
Three light pens, 

Two Shugart drives, 


And a BEEB with a Three Month Guarantee? 
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HOJ TO GET RID OF A PAIN IN THE NECK 
Geoff PF, 


Entering programs from books or magazines can be a pain in the neck. 
And the back and shoulders too. Sitting hunched over a Keyboard 
copying line after line of yext, (sic) then swinging one’s head up to 
Stare at the telly or moniter toa check you’ve got it right is an 
ergonomist’s nightmare. After half an hour you get up to stretch and 
feel like you’ve been humping sacks of coal all day. 


There is an easier way. J] saw the answer in a commercial stationers. 
A device called a copy-holder - basically just an upright clipboard - 
guaranteed to leave you sitting more comfortably, not least because it 
lifted more than #38 worth of small change from your Back pocket! 
Having nothing in my wallet but an impressive collection of moths, I 
determined there must be a cheaper way, 

And there is: $3.35 and a half-hour work. 


You will need: 
} Eastlight Clipboard $3.20 
2 iSmm wood screws 18 
1 piece of wood 26mm thick {Can be found anywhere. 
230% 1 BAnm ~ apiece of your neioghbour’s 
house, for example!) 
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The diagram should be self explanatory, even to the most 
architecturally imept; the Key to the whole device being the 75° angle 
on a piece of wood used as a hase, Those like myself who are unable 
to saw straight should use a plece of coarse sandpaper to achieve the 
desired gradient. 


The clipboard mentioned is the cheapest, most practical and most 
robust on the market. It has 4 plain hardboard base (ideal for 
drilling holes in), and a strong, wide clip that can hold the weight 
and depth of my 2@@-page dictionary with ease. Beware of perspex 
imitations at three times the price! 


Simply drill a couple of holes, countersink them to Keep things tidy, 
and insert the screws. Philistines may use mails, though I’d advise 
you to drill the hardboard first in case it splits. 


What could be easier? Well I Suppose you could always crib somecne 
else’s programs at the next User Group meeting. 
Now there’s an ideas. 


VAMPIRE ADVENTURE 
reviewed in Hamilton by Andrew A, 


From #G Software, Box 6462, Auckland price $24.95. 


The object of this text-only adventure game is to fing and Kill Count 
Dracula, but first you must cutwit the hungry hounds, the evil bats 
and other unsavoury characters, Hasier said than done! Although it 
isn't difficult to get started and find your way through many of the 
rooms, actually getting through tc the end is very difficult. Moving 
from room to room in the castle, you must make the best of your 
‘senses’ Gecause after a mumber of moves the clock strikes twelve 
times and you fing yourself waking up in a strange room, without any 
of the objects you had before. A similar fate awaits you when the new 
day begins! ; 


Vampire Adventire is supplied with a bacK-up copy on the reverse side 
of the tape, and has a SAVE facility. Although it lacks the large 
vocabulary of some adventures, Vampire Adventure is an amusing; 
well-crafted adventure that will-test experienced adventurers while 
still being suitable for beginners. 
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ELECTRON— 
A FASCINATING PIECE OF HIGH TECHNGLOGY 
H. Wiggins’ Adventures 


I have had this new device, the Electron, for over 6 months now. At 
first ] pined for the use of my printer; lying sadly idle. However, 
the Plus { interface arrived and I bought one of the first of these, 
This promised printer access, but alas, my printer has serial input. 
An article in July’83 "Electronics Australia” described am inexpensive 
paraliel to serial converter which to my sorrow did not work until I 
discovered that a capacitor was needed in the acknowledge line. This 
is mot mentioned in that article, mor in several I saw. Said printer 
now works beautifully. Everyone asks me how I like the Electron, and 
imply I should have bought a BBC. However, I reply that I bought the 
Electron for home use; being a retired person. The cost of a BEC at 
that time was not warranted at NZ prices. Comments are: Keyboard 
good; BBC Basic good, machine code facilities excellent, lacks an 
R5432 cartridge which would have bypassed the effort described above. 
This too may arrive in time. 


At first I complained about the lack of Electron programs and their 
price. Now there is plenty of exercise to be had in typing in the 
programs which are available in the literature for the &lectron, 
Also, many BBC programs run well. There are some good, if expensive 
magazines, I subscribe ta one, ELBUG, produced by Beebug. Here is a 
brief program from it to make your Electron tick like a clock: 


1@ REPEAT TIME=6:2M.1 
26 REPEAT UNTIL TIME>196:TIME=@:2M.06 
3@ REPEAT UNTIL TIME?>1@@:UNTIL @ 


De not leave this program runming indefinitely - the relay might not 
like it, 


I have had difficulty in running some of the more exotic BBC programs. 
One such is WORD PERFECT which goes nicely but refuses to print (one 
of the reasons this article was produced on a typewriter - one of 
those annoying machines which does not Know how to spell). However ] 
have consulted an Oracle as to why this one does not run. Ferhaps 
TONY will be able to tell me. 


The graphics appear te be the same as the BBC. The Electron has 204k 
of space available for Basic programs. (cf BBC with 274K in Mode 7 or 
20K im Mode 6). This has never worried me. It also doesn’t have 
Teletext Mode 7 but since 1 doa not Know what it is; this has never 
worried me either. The 1.2 operating system and BASIC Ii can differ 
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in odd respects from the older BRCs (@.1 OS and Basic 1), and it runs 
a little slower - about 8@ compared to 6@ on a BBC in a test program. 
The sound has one channel with a very tiny speaker, but the BBC has a 
variety of noises. 


Ihave alsc seen good X/Y¥ drawings made on a plotter with an Electron. 

The plug-in cartridge facilities enable one to use LISP and FORTH as 
alternative languages. These same plug-in sockets show promise like 
the sideways RAMs do in the BBC. I have not so far used the 4 
channels of A-D which are available. Altogether one can say that the 
Electron is a fascinating piece of high technology, and one which has 
the ability to develop further. 


SORF 
reviewed in Westport by Jamie D 


Doctor Soft, $24.95. Review copy supplied by FG Software, Box 6662, 
Auckland. 


The object of this game is to obliterate the 4 screens of attacking 
aliens. You have three lives ta do it in. 


The first screen is much like Space Invaders in that you have to shoot 
alien ‘meanies’ progressing slowly across the screen. Screen two is 
more difficult; you must shoct the aliens that swoop down on you. The 
third screen is the most difficult of all in my opinion, You must 
shoot the alien craft that circles around and around dropping fire 
‘balls (these cannot be shot). The fourth and final screen is where 
you do your utmost to destroy the Gorfian Mother Ship. Occasionally a 
bullet appeared to go through a meanie, though it may just have been 
my aiming. 


Each time you complete a set of Screens; you are presented with a 
harder (MUCH harder) set of screens to accomplish. 


You control your ship with either joysticks or Keyboard. Either way 
there is fast response. The sound and graphics are excellent, but the 
flashing on the first screen may be a little annoying. 


‘A very enjoyable program which the whole family may like (mine did). 
The sound is a bit loud and may get your mother {or Wife) telling you 
to stop playing, but the game is so good you won’t want to. A nice 
touch was the way the instructions scrolled slowly up the screen, 
giving you ample time to read them. 
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TOGALKIT - BEEBUG’s 
reviewer F,.Hoonhout Hami ft ton 


Many months ago I saw an advertisement in BEEBUG for a ROM-based 
Toolkit for BBC Basic. Delighted by the thought of this, I promptly 
invested around ‘17; sent off the draft and settled back for a 
lomad wait. Imagine my surprise when 16 days later a parcle 
arrived at my local PO, tax of 15% outstanding. I duly paid the 
minimal charge {around $4) and found one Toolkit chip and manual, plus 
fitting instructions. 


Having fitted the ROM; on turning it on all to be had was a continuous 
whine from BEEB. Fault: @.4 05. A visit to the local computer shop 
soon put matters right {and my purse lighter) with a 1.2 OS. Typing 
#HELP proved the Beeb now accepted Toolkit, and out came the manual, 


The follawing functions are available, some of which are explained 
further: 


#Check *Memor y ¥0¢ 4 Recover #Util {19> 
*Ulear Merge *Old #Renumber 

Edi t Move #0n (f) *Report 

#Free New *Pack *5creen 


All commands cam be prefixed by the letter ‘B’ to avoid clashing with 
similar commands operating in other ROMs in your machine. 


#Clear clears and resets all variables, A%4-Z% to 2ere. 
%edit enters a remarkably fast and powerful screen editor. 
emem displays a Hex and ASCII memory dump, accessing all memory 
locations from &@ to &FFRF (handy for cheating at SPHINX!) 
#util enters the menu-driven utility editor. In it the following 
options are available: 

1) string search 

2) search and replace 

3) move pragram lines 

4) list procedures and functions 

o) list variables A% - 2% 

4) list other numeric variables 

7) list string variables 

S) list arrays 

9) select sub-range for options 1&2 

18) enter screen editor. 


One hint that wasn’t in the manual (and caused me to initially believe 


the chip was faulty): you meed to run your program before options 4,7 
% produce results, 
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The string search and replace options have the useful ability to 
distinguish between BASIC Keywords amd other words. Thus if you 
wanted to replace the word "print* embedded in PRINT statements by the 
word "written" you won’t end up with “written” Keywords all through 
your file. The Keywords (to be recognised as such) need to be 
Preceded by a °” © 


In my opinion the ROM-based Toolkit is the most useful piece of 
software for people who want fast and easy editing of their BASIC 
programs. It doesn’t use up anr RAM, and when debugging programs; the 
screen editor is entered at the line where the error was detected. 
Having used Toolkit for several months now; | can’t imagine ever doing 
without a "programmer’s editor” again. 


MODEL A’ RE VENGE 
Are you the proud owner of a Mighty Model A (that rare and 
fast-disappearing species), and sick of smug looks on faces of Model B 


owners? Well here is your chance of a sneak revenge raid! Type in 
#FX254, press BREAK, and walk away quietly — you have now converted a 
Modei B to a {6K machine! It can omly regain its full 32k by 
switching the whole machine OFF then On again; or by typing in 
*FX255,x where x is... (I can't quite remember) 


APPLIED ENGINEERING AND TECHNOLOGY LTD 


3 HALLEYS LANE Phone ¢(84)856-868 
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Ett Te 
reviewer Kejfth F 


This Acornsoft program is am interactive came of the highest merit, 
far removed from the two-dimensional non-stop action arcade games. 
Here we have a game that requires thought and decision making as well 
as quick reactions. The player plays the part of an interplanetary 
trader, and accordingly can choose destinations and cargo carried. 


A wide range of goods is available to choose from, and prices vary 
from planet to planet. For example, computers are more expensive con 
an agricultural planet than an industrial one, The planets 
themselves, as well as being rich, poor etc, also have differing 
government styles ranging from corporate state (nice and safe) to 
anarchist (downright treacherous), 


The hapless trader begins his task in a ship with a single laser 
facing ahead. This tends to be a drawback; as pirates usually attack 
from the rear! If the player survives, he presumably makes money and 
‘gradually improves fis ship with extra and more powerful lasers, 
missiles, extra cargo space etc, 


Travel is 3-dimensional (as is battle) and incorporates hyperspace 
travel, thus allowing a large number of galaxies to be explored. 
Space flight is "realistic" in that it is frequently boring. Beware 
he who falls asleep however, as death comes quickly to the tardy. 
Attacks by pirates are an unavoidable part of the game; the ferocity 
and number of attacks being relative to the gevernment type of your 
destination. 


Combat takes place in 3-D with lJasers and missiles. Unlike most 
Games, fire power is limited. Lasers overheat if fired for too lon 
without pause; missiles have to be targeted, and only a maximum of 
are permitted on any journey. Just to complicate matters further, 
attacks can come from more than one direction at a time, and with 4 
screens to look in (one at a time) you can only aim and fire in one 
direction at a time. However you do have a 3-D radar permanently 
displayed at the bottom of the screen ta give an all-round view. You 
only have one life per game, so it pays to become a skillful pilot and 
an economic marksman. It also pays to Save the game before leaving 
the safety of a space station, lf you get Milled) you are 
automatically re-started at that position - without having to re-load, 
Couple these with astute business skills and you may reach "Average" 
after if hours play! (Broken, mot all im one session), There are 
Still five more grades to reach "Elite". You initially start the game 
classified as "Harmless" 


The variety of weapons and ships available depends on whether you get 
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the disc or the tape version. (The disc is more elaborate), Play can 
take place on the Keyboard; or with the aid of a proportional 
Joystick, An excellent set of instructions/manual, a short story 
showing what you can do, are supplied as well as a functionKey strip 
and reference card. The prudent will study them weil, 


This is not a complete description by any means; there is not the room 
ta go inte the scanners, system descriptions, status reports; police, 
contraband, space stations, energy bombs, control panels, technology 
levels, planet populations, cargo scoops, sums; ‘jumping’, bounty 
hunters, anti-missile defences, meteorites, shields, energy banks, 
docking computers, alien iteMSasesen 


Suffice it to say, Elite is the best computer or video game | have 
ever played (and I’ve played a fair few in my time!) 
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FASTER A-D CONVERSION 
Use #FX190,8 to force $-bit conversion instead of {2-bit. This 


gives faster conversion over the same range as before, but with 
less precision. Reset with #FXi9@,0 
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ELECTRON #FX EXTRA 


The Electron user Guide lists only a small number of the #FX 
calls that it can use. Apparently most of the #FX (OSBYTE) calis 
for the Beeb will also work on the Elk; unless they refer to 
features not present in the Elk tea RS423 - but if you have the 
Plus i and then buy the R§423 extra, such a call will work?) 
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DISABLED ESCAPE 
15 can be done by using #FX200,1 and reset by #FX200,0 





iFfSes CHeLENDAR 
Neil B  AKId 


This calendar fits nicely on a sheet of A4 paper. It was written for 
Beeb plus the Epson-alike Logitec. The paper must be inserted twice 
through the printer. On the first gass January to June are printed; 
on the second, July to December. After the first pass, replace the 
paper and press the Select button on your printer to continue the 
print rum.  (Ed’s "typist’s" mote: changes appended for CITOHs 
include reverse line feed to avoid this) 


Printer control codes have been REMmed for conversion heip. I would 
advise omitting line 158 until the program is fully and correctly 
typed in, or got to a stage where printing out is feasible. You will 
notice that Good Friday is added at the bottom - I eliminated 
PROCeaster for brevity, but this can easily be added by readers 
wanting it, by entering the relevant code from Anton’s program in 
July ‘S4 Beeblet. 


CITOH alterations: 


148 REM 

176 VOU2Z,1,27,1,469:REM elite 

266 VDUI,15:REM elongated released 

276 IF X=? THEN VDU1,12,1,27,1,114,1,12,1,27 31,162:REM f 
orm feed, reverse line feed, "form feed, pea line feed 
& again 


1@ REM #% CALENDAR by Neil B 11’84 

28 MOGDEG 

36 i= 

46 DIM M3012) ,NAC12) ,DAY$¢7) 

06 FOR A=i TG 12 

66 READ M3<A) NALA) 

76 NEXT 

88 FOR A=! TO 7 

98 =READ DAY$(A) 

188 NEXT A 

118 REPEAT 

128 0 INPUT’7*Enter year * YY 

13@ 0 UNTIL Y431751 

148 DeFN¢irstday(YZ) 

158 VBuU2 
. ve VOUL 27,1, 64:REM reset the pr 
inter 

176 VOUS ,27,1,9B.,1,8:REM ELITE 

186 VOU) ,14:REM elongated 
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198 PRINTTAB(14)"CALENDAR FOR °; YY 468 UNTIL LENG 

200 YDUI,29;REM elongated released 478 = DeDtiNAix) MOD 7) 

21@ IF YY MOD 4 = 6 THEN Nvd2=29 489 JF 037 THEN D=D-7 

228 MLZ=5 490 FOR AZ=WLYTO MLY 

236 38a PRINT 

248 FOR X=1 10 12 318 NEXT AZ 

208 4=WLA=8 328 = NEXT 

268 JF X<? THEN TA-@ ELSE T/=46 338 VDUI 12,3 

278 JF X=? THEN VDUL,12:REM form f 548 H=19 

eed Jus END 

288 4 3= LYE LENCM$(X)) DIV 2 544 

298 = PRINT’ TABCTA+22-LA)M$(X)? J78 DEF FNfirstday<Py) 

388 =©PRINTSPCC4+7) : 588 L=FA-1 

318 FOR 1 TO? 598 P=L/188 

328 PRINTDAYS$(B) :SPC4: 488 214=P/4 

338 NEXT 61@ 224=P 

348 = PRINT 620 234=54L/4 

358 =—sK=0 638 2=36+23%-2244214 

ee 640 =2~(7¥INT2/2)041 
=K+ 

ne ae PRINTSPC6: 668 DATA JANUARY ,31 , FEBRUARY 128 MARC 

499 TIL Keo oO DATA APR 

8 is8 IL ,38 MAY ,31 , JUNE ,38 

496 REPEAT Pg DATA JULY, 31 AUGUST 31 , SEPTEMBER 
=Lt 

ae PRINT Ly afte OCTOBER, 31 NOVEMBER, 98 ,DECE 

458 if (L¢D-1) MOD 7? = 6 THEN PR 


STRING PUZZLE 


16 REM String Puzzle 

26 At = "A" + CHRECK&OD) + "2" + CHRE(&O6B) 

38 PRINT A 

46 PRINT LEN‘CAS) 

36 #sIF AS = "2" THEN PRINT “Same“ ELSE PRINT 
"Different" 

4&8 END 


What is happening at line 207 (remember that CHRS$(@0D) is a carriage 
return). What will appear on the screen; what will appear on a 
printer if one is enabled before Running the program? Yes! You do 
get different results! Line 5@ won’t make much sense until you do run 
it. 


Those of you who are familiar with Indirection Operators might like te 
define a byte array using T% to store the start address. Then 
replacing ALL occurrences of A$ with $T%. You may well be surprised 
at the resuits -1s LENgth still the same? 
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TEXT DISPLAY SPEED 
GCF 


It should be obvious (ie it took me 18 months!) that some modes 
display text faster than others. In fact Mode 7 is fastest on the 
Beeb, and Mode 6 on the Elk (Electron). However the idea for actually 
finding the differences did not occur to me until after buying a 65¢2 
co-processor, 


The program here prints "X" 10¢,06@ times on the screen in each Mode. 
It was run both with and without an active co-processor. I¢ you don’t 
have a printer, delete the VDU2Z. ElK-owners could also run the 
program, though you may prefer not to try to time Mode 7! Anybody who 
wants to rerun it with variations may want to reduce N% to a smaller 
value (eg 123: N%=106@), as the current value of 1E5 takes an age and 
a day to rum. (Actually about 15 minutes on a Beeb; and perhaps 
nearer 25 minutes on an Elk) 


16 REM This shows that it takes longer to print in 
some modes than others! 

26 DIM mode_timex%(7) 

30 N4= 1E5 

40 FGR mode% = @ TO 7 

98 MODE mode” 


66 TIME = 6 

78 FOR I% = 1 TO NA 
=i) PRINT *X* 5 

a) NEXT 


16@ §=mode_t imeACmodeA)=TIME 

118 NEXT modex 

1276 MODES 

13@ VBU2 

14@ PRINT"MODE seconds - TO PRINT ";NA3" X75" 

158 FOR modeA = 6 TO 7? 

168 PRINTTABS 2) ymodeX%s3TABs 4) smode_t imeX%<(mode4)/16a 
178 NEXT modex 

188 VDU3 

198 END 
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Number of seconds to print 168,680 "X"%s 
MODE BEES BEEB+co ELK 


6 6.7? 48 92 ? 
1 124.56 66.42 tu 
2 193.52 135.38 ? 
3 7,61 46.32 ? 
4 77.55 46.52 - 
3 125,62 67.49 ? 
6 7,56 48.52 Ls 
¢ 81.2? 46.52 


ANALYSIS 

For Modes @ to 4 on the Beeb, the time is largely dependant on the 
number of bits per pixel, and hence the work required to set up a 
character matrix of 8x& pixels in the video RAM. Hence the time 
required for printing in any mode with one bit per pixel (2-colour 
mode) is almost exactly the same. The smal) differences can be 
attributed to extra “carriage returns" and serolling required in 
different modes. EK owners should find a more dramatic difference as 
the effective speed of the machine depends on the amount of video RAM 
sae displayed. (The clock rate is 1 or 2 MHz, dependant on Mode, 
and for the 2@ & 46k modes the 65@2 processor is actually disabled for 
part of gach scan line displayed on your tv). 


The main reason a dual processor Heeb is faster at printing is that 
while the 1/O processor is working cut what bits to set in video RAM, 
the Language processor is busy working out what to do next. They work 
in parallel. Astute readers will mote that a dual Beeb is just as 
fast in Mode 6 as in Mode 7; 8, 3, and 4 - this must mean that the 
superfast 3MHz 65@2 is actually holding up the 1/0 processor, when 
printing in a 2-colour mode!! 
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SYSTEM abt DISPLAY 
GC 


1@ REM Display all system integer variables 
Zé MODES 

36 FOR V = ASCC"|") TO ASCL*Z") 

46 At = CHRECY) + "XK 

36 8 FRINT A$, EVAL(AS) ," &" 5 ~“EVALSLAS) 

66 NEXT 

7@ END 


A quick and nasty program to display the contents of all the resident 
system integer variables, both in decimal and hexadecimal. The 
program itself does not use any system integer variables (A%, Bh, 
i AP 





LEFT RIGHT FROGS! 
fAinne F 


Children often take a while to sort out Left from Right consistently. 
This program offers some practice at getting them straight. There are 
two ponds, in the shape of hands: the left hand on the left side of 
the screen, the right hand on the right. A frog hops from between 
them in and out of the ponds; and eventually doesn’t come out from one 
of them. The child has to say which pond it is in - left or right. 
The pond he indicates empties, to reveal... a frog if he’s right, or 
nething if wrong. If he is wrong, the correct pond empties next to 
reveal the frog. The program tries to make the correlation between 
tla words Left and Right, the sides {of the Keyboard}, and the hand 
shape. 


There is a mild problem in this - "L" for Left is on the right-hand 
side of the Keyboard, and "R" for right is on the left! A solution to 
this was triggered by an Acorn User program: use an averlay on top of 
the Keyboard. The child then has only to press a Key in the Left or 
Right half of the Keyboard to indicate which side he thinks the frag 
is in 


THE OVERLAY 

is just a sheet of paper (a bit bigger than A4 preferably), slid under 
the function-Key strip to hold the top edge down, and taped down over 
the front edge of the Beeb, An example of what it could look like is 
at the end of this article. The hands aren’t essential. The keys 
#4,6,Y;G,B will not respond to being pressed - they are a nominal 
dividing line, Space Bar doesn’t work either - how can the computer 
tell whether the child pressed the left side of it or the right? 


THE GRAPHICS 

make use of scaling (remember the angels last December issue?), 
resetting graphics origins to position them; and OS1.2 command PLOT 77 
to fill and empty the ponds. There is only one hand defined; the 
program reverses the shape for each drawing and adjusts the size for 
the program closure. Likewise there is only one PROCmove_frag: 
parameters to it indicate where it is starting from and going to. 


MAKE IT HARDER 
by removing from PROCsplosh the lines PROCdroplet, wait, PROCdropiet. 
These lines make some “splashes” appear when the frog lands in the 
pond, then disappear, and provide a reminder and a prompt of which 
Side the frog is in. 


SCORING . 
As written, there is a good _score% and a bad_score%, which are 
incremented by one each time depending on whether the answer was 
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correct or not. At the end of the program if the child got more 
correct than wrong, he is congratulated, otherwise offered a 
(hopefully) encouraging word. 1 suspect that good_score% should be 
perhaps twice bad score’ (ie 67% success rate) before being told he’s 
doing well. 


NOBELED KEYS 
etinand$ is aii those Keys on the ad flo which indicate a left-hand 
answer. unmwanted§$ is the dividing li 


ine. This means all other Keys 
default to righthand$. 
The function Keys have been redefined -to return a number so they can 
be included (#FX225,123), the cursor Keys have been set to return a 
value (#FX4,1) as has ESCape Key (#FX229,1), 


I recommend REMming these lines of the program until you have got it 
typed in accurately. FNgquit and PROCtidyup allow the child to exit 
the program and reset all the Keys back to normal behaviour. 


WARNING? 

You need something better than OS @.i for this. Disc owners also need 
to reset page lower than £190¢@ eg PAGE=&1200 before running the 
program. 
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— > 
en 
426 let thand$="Q1W2ESR4TSASDFZXCV" + 


16 ON ERROR PROCtidyup:CLO:REPORT:P © HR9Z7+CHRS7+CHRS128+CHRS) 274+CHRS1304CH 


RINT" @ line *sERLsSTOP R$i31 
28 REM Frog in a pond 436 unwanted$=" 47658" +CHRSi32+CHR$32 
38 REM Left-Right decisions 448 VDU23, 244 £99 ,&BD GFF ASC &3C £9 
46 REM by Anne F 9 &5A ,&24 
38 REM tatest version 36/11/84 438 VOUZ3, 258 ,&3C £42,454 £80 £8) 45 
68 


A, G42 ,&30 
76 REM #4##% disc owners! reset PA 4466 ENVELOPE! ,4,45,8,6,6,9,8,1,8,-38 


GE or get No Room message soon 568,128 
8 476 aie tre 16,8 ,8,8,6,9,8,34,18,- 
98 PROCsetup 26, Raye 26 
188 MODE! evoPhoc 


118 PROCscreen 

128 wai t=INKEY¢( 2099) 

138 MODE2 

148 YOUI9,1,238319,2,4383 

4 4bsl?, 7 430119, 6,27051 

#66519 19412 438 
Ox7=8 : SY4=8 

7 vDU23s 82623859; 

178 REPEAT 

188 CLS:CLG 

196 PROChand(12,8,1279 64) 

266 PROCEiliup 

218 PROC jump 

228 PROCtest 

238 UNTIL FNquit 

248 PROCtidyup 

258 MODE! 

268 PROCscreen 

278 END 


284 

298 DEF PROCsetup 

308 good_scorex=6 

319 bad_score/=6 

328 introz=TRUE 

338 DIM XFiRT4C11), YstartHdi)), Yti 


nati? 


348 RESTORE 2686 

398 FOR Wal TG 11 

368 READ Xfi TTACIA}, Ystartaclé), Yf 
inéC TA) 

376 NEXT 1A 

386 *FX225,128 

390 3KEY180, MRUN H 

466 #FX4,! 

418 4FX229, 1 
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068 DEF PROCscreen 

018 SXA=2:SYA=2 

576 PRINTS? errr 

vad IF introd THEN PROCstart 

246 IF (NGT intro’ AND goocLscore’ > 


bad_scoreé) THEN PROCcongrats 


308 IF (NOT intro’ AND good_score% ¢ 


= baduscoreA) THEN PROCnext_time 


968 PROChand( 2,198, 1188, 768) 
378 PROCKand( 2, 108, 1188 ,348) 
388 introA=FALSE 

398 PRINT!“ */ 

686 ENDPROC 


418 
426 DEF PROChand(C%A%,B% 0%) 

438 SCOLA Ci 

648 FOR 1% = SX% TO -SX% STEP -28SxXy 
65@ RESTORE 2578 

468 1F 14)8 THEN VOU29,A4:D%: ELSE ¥ 


DU2? BA ;DA; 


678 READ X%,Y% 

$88 MOVE XU#1%, YU#SYY 

698 FOR Jv= 1 10 30 

788 READ XY, YY 

718 DRAM XU#1%, YUXSYY 

728 NEXT J 

738 NEXT 1 

748 ENDPROC 

758 

748 DEF PROCEi} up 

778 LOCAL X%,Y%,2/ 

788 FOR 1% = SX/ TO -SX% STEP -2xSXY 
798 1F 1%)6 THEN YDU29,0:44s ELSE YD 


U29 1279364; 


880 FOR Wel 101 


LL Sy A PP A SP SS ddl dee ree egy oy 


818 JF J4=1 THEN SCOLO,4 ELSE GCOL6, 
2 


B20 XA = XFL) alY 

838 YY = YetartyidK) S77 

B48 2% = YF ind) ¥SYY 

858 FOR KZ = Y% TD 2% STEP 4 

R48 PLOT 77, X%, I 

876 NEXT Ky 

880 NEXT JY 

896 NEXT 1Y 

908 GCOLO,? 

910 VDUS:MOVE-1152,-36:PRINT*Left" iM 
QWE=400 ,-24:PRINT*Right® :VDUd 

920 ENDPROC 


939 

940 DEF PROC Jump 

959 GCOL3,! 

948 VOUZS 64031085 

978 VDUS :MOVE 4, Bs  PRINTCHR$ 244: UDU4 
988 jumpers = RND<4)+1 

998 FOR jumpsé = 2 10 jumpers 

1884 ¢rog_sides = RND(2Z) 

1918 IF frog_sideé = 1 THEN PROCmove_ 
#rogtié66 440,168) ELSE neteae 
826,448, 18@) 

1928 PROCSplosh 

1038 IF juaps4 < jumpers AND frogisid 
e4 = £ THEN PROCmove.trogt648 1468 , 188) 

1848 TF jumpsé < jumper’ AND frog_sid 
‘4 = 2 THEN PROCmove frog? d48 1856, 188 

1896 NEXT jumps 

1869 ENDPROC 


1478 

1088 DEF PROCmovefrag (x14 x24, 7A) 
1898 LOCAL 14,K,RA,XA HA 0X4 ,OGK 64 
1166 Hé=é86 

1118 GCOL3,1 

1128 RA=(x14-x24/2 

1138 VOUZ9, (xitenZAy/2sYA3 

1148 VOUS 

1158 K=HA/(RA¥RZ) 

1168 OX4=-R4 OG450 

1178 S4=8xSGNCRA). 

1188 FOR X4=-R4 TO RA STEP SX 

1498 MOVE 0X4 ,0G4. 

1280 #FX19 

1219 PRINTCHR$244 

1228 GA=HA-K#XA#XA 


mmm mes ces cee ceri eh steel ewe eer ces sein woes ede A ee ep ee ey ey ee ee 


1238 MOVE X4 ,64 

1248 OXA=XA 064564 

1258 PRINTCHRS244 

1260 NEXT XA 

1278 Vbud 

1288 ENDPROC 

1298 

1386 DEF PROCtest 

1316 IF frog.sidex = 1 THEN side$ = " 
Heft" ELSE stde$ = "right* 

1328 YDU28,8,8,39,8:REM set up text 
window 

1338 COLOUR 

1348 PRINT’" Where is the frog?" 

1358 PRINT’" Leét?" sSPC5:*Right?* 

1366 PROCprompt 

1376 IF INSTRi tet thand$,reply$) THEN 
replysideé = 1 ELSE reply sided = 2 

1388 PROCempty(replysides) 

1396 IF replyisideé = frog_side% THEN 

PROCcorrect ELSE PROCwrong 

1496 ENDPROC 

1418 

1426 DEF PROCcorrect 

1438 good_score/=good scorez#] 

1448 VOUZ8 8 ,8,19,6:CL5 

1458 COLOURS 

1448 PRINT* Yes,"*/*the frog was in t 
he’? 

1478 JF sideg="rioht™ THEN PRINTSPC?; 

1486 COLOURS: PRINTs i ded; :COLQURS :PRIN 
7" pond" 

1498 COLOUR 4 

1398 PRINT’ ’’SPC8"YES!": 

1318 wai t=INKEY< 366) 

1528 ENDPROC 

1338 


1348 DEF PROCwrong 
{959 bad-score/=bad_scorest! 
1548 YOUZ8,6,8,19,8:CLS 
1578 SOUNDS ,2,5,18 
{588 wat t=INKEY(108) 
1598 COLOURS 
1688 PRINT*No,**‘"the frog was in the 
1618 IF sideg="right" THEN PRINTSPL9; 
1628 COLQURS:PRINTside$; :COLOURS: PRIN 


p 
1638 PROCempty<frog_sidex) 


cs es et ee ee ee ee ee ee ee ee ees ee es ee et ee a Oe Oe eo ee ees ee ee 


1648 ENDPROC 
1638 

1666 DEF PROCempty<side/) 

1676 GCOLG 8 ) 

1680 IF sides = 1 THEN VDUZ? 05643317 
=$xiixsided = [32:incA=64 

1698 IF sideA = 2 THEN YDUZ9,1279564; 
STAR-SXA:Xsides = -(S2:incA=~-64 

$788 FOR Jv= 11 10 1 STEP -1 

1716 3F J% > 1 THEN SCOL8,136 

1728 XA = XFIT LAC SAD #IZ 

1738 YA = Ystar tac dA) sy 

1748 24 = Y4indACdA) SYA 

1798 FOR KA = 24 10 YA STEP -4 

1768 IF JA = 1 THEN GCOL3,4:PROCgtug: 
GCOL8 132 

1776 PLOT 77 ,X4 KA 

1788 NEXT KY 

1798 NEXT JA 

1888 GCOL8,2:GCOL8 ,128 

1816 REM flush that dratted channel 8 
and } sound 

1826 #FX21 ,4 

1838 ¥FX21,3 

1848 ENDPROC 

1856 

1868 DEF PROCglug 

1878 MOVE Xsidew ,KA:DRAW XsideAt inc, 


KY. 
1889 SOUND ,-15,3,1:SCUNDI ,-1,188+K%, 


1898 ENDPROC 

1988 

1918 DEF PROCSplosh 

a SOUND@ ,-15,198,18;SOUND! ,-18,88, 


1938 random.seed% = ABS<RND? 
1946 PROCdroplets 

1950 wai t=INKEY(58) 

1948 PROCdroplets 

1978 ENDPROE 


1988 

1998 DEF PROCGropiets:LOCAL X4,YA 1% 

2888 dummy” = RND{-randomseed/) 

2618 GCOL3,16:VDUS 

2828 FOR TA = 1 TO 9 

2838 IF frog_sidez = 1 THEN X%=RND(46 
8)-308 ELSE X4 = RNDC 488) 

2848 YA@RND( 388) +168 sMOVEXY ,YA:PRINTC 


cows GR cots cat es i GE) ee es es ee ed ed ee ee ee ee 


rs ce ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee a ee oe = - 2 


HR$258 


2058 NEXT 1% 

20468 VDU4 

2678 ENDPROC 

2B8B 

2098 DEF PROCtidyup 

2188 VOU4 24,28 

2118 #4x225,1 

2128 ##x4 

2138 #FX229 ,8 

2148 #FX15,1 

2158 ENDPROC 

2148 

2178 DEF FNquit 

2188 VDU26 

2196 COLOUR? 

2268 PRINTTAS(@ ,38)"Left to end OR"’ 
right to continue’; 

2218 PROCprompt 

2228 JF INSTR(le¢thand$ replys) THEN 


= TRUE ELSE = FALSE 


2238 

2248 DEF PROCprompt 

2258 ¥FX19,! 

2258 REPEAT 

2278 *FX282 , 32 

2288 reply$ = GETS 

2298 UNTIL INSTRCunwanted$ replys) = 


8 
2386 ENDPROC 
2319 


2328 DEF PROCcongrats 

2338 COLOURS 

2348 PRINTSPCI 2: "CONGRATULATIONS, " 
2358 PRINT’ ‘SPC8"You do Know the diff 


erence" 


2368 PRINT’ ’SPC16"he tween" 
2378 PRINT’ ’SPC?" le¢t” ;SPC7" and” sSPC? 


"pight* 


2388 ENDPROC 

2398 

2488 DEF PROCnext_time 
2418 COLOURS 


2420 PRINTSPLS* left" SPCS" and” ;SPCS"r 


se 
2438 PRINT’ ’SPC1B"are® 


2446 PRINT’ ’SPCIS"atfficult," 
2456 PRINT’ ’SPCi@"better tuck next ¢i 


me" 


mere end mG Ge OA SD EN GE a a SD AD SS > ee 
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2468 ENDPROC 
24768 


2468 DEF PROCstart 

2498 PRINT" Fred Frog hops from pon 
Gd to pond." 

2068 PRINT‘ ’SPCi4*When he hides" 

en PRINTS" press a Key on the sid 
e he 18 hidden 
Rant PRINT’ “SPC?*Le¢t*sSPC" or* SPC?" 

ight 


2938 PRINT’’’’’*""Press any Key to st 

art* 

oan, ENDPROC 

2968 REM hand outlines $F$ $+ 


2076 DATA 18,6,18,4,18,18,14 
2,49,4,46,5,49,17, 38,1831, 31 
314,97,16,58,26,95,22,43,24,4 
2088 DATA 28,63,34,35,33 
62,3840 ,45,22,47,2/ ,98,3 
| 

2598 REH ‘hand & thumb 
At DATA 31,9,8,36,8,21,98,21 ,34,31, 


2618 REM little & fourth fingers 
2628 DATA 16,30,98,5,38,44,3,44 45,26 
90,47, 14,47, 59 

2630 REM ‘middle & index fingers 

2648 DATA 2?7,35,465,35,95,62 


$ 
4 
4 
é 


1 
j 
} 
61 
4,6 
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mS ROSE BY AhYY OTHER NAME 


Some things can be done in a variety of different ways to 
achieve the same effect: 
NT"A* 
PRINTCHR$45 for instance, these three 
VUES 


PRINT" : 

FRINTSPCS these four do the same 
PRINTSTRING#(5," "> 

VDU32 ,32,32,32,32 


PRINTTAB(X,Y) "A" 
VDUS1 X,Y, 65 


LL LS SS A SS mts bck mek ng ie a-ak eee ee ei Sg 
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ZAPPER 
Neville T. Ch‘ch 


For those of you who like little puzzles, here is one with graphic 
representation. Full instructions are included in the program. 


Once you have discovered valid sequences; you cam make things harder 
and fun again by starting with random squares already filled. To do 
this, add the following line: 


365 FOR K=i TO S:PROCfIMRND(F): NEXT 


16 REM #4#% ZAPPER! ¥%4 

26 REM by Neyiile Tomlinson 
38 REM Sept 784 

: REM version 6.2 


s] 

68 #7255 

78 DIM numberA?) ,carxéc?) ,cnryAc?) 
86 MGDE? 

90 PROCheader ;PROCinstr 

188 REPEAT 


144 = MODE] sVDUZ3 32,9258 305 23:8282 583658: 
128 = PR&Cinit 

138 REPEAT 

146 PROCKeys 

158 PROCpict 

146 UNTIL checky 

176 = wai t=INKEY( 186) 

186 4«=MODE? :PROCheader :PROACagain 

{98 UNTIL NOT yess 

268 END 


216 | 

229 DEF PROCinit 

238 RESTORE 336:VDUS 19,3438; 

249 moves/=8 correc t/=FALSE 

208 FOR Ket T0 9 

268 0 numberACK=O:READ corxath) .cnryAdk) 

278 = SCOL8, 1 sMOVEcarxACkK) ,coryACk) DRAW Cor xACK) +258 ,coryACK) sDRAWcorxd(K) 4258 
caryé(K)-250 DRAW CAP AY CK) ,cary4(K)-250 DRAWCHEXACK) ,coryZcK) 

288 = GCOL8, SsMOVEcnrxAck)-271 ,cary4Ck)~189PRINTK 

296 ~=WNEXT K 

388 Youd 

318 ENDPROC 


32 
336 DATA 258,1084,519 1068, 778, 1888 
348 DATA 258,748,518, 748,778, 748 


a ee aes ee me ee a Mee el ay gy ee es el MS oy ted Geen ee Pea ie ri feeds Getler ie ee i 
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a DATA 250,488,51,486,776, 480 


6g 
376 DEF PROCKeys 
388 COLOURI36 :COLOUR3 
398 PRINTIABC12,38)"Which Square ?"; 
468 REPEAT key4 =6ET-48 
440 UNTIL Key4>@ AND key4<18 
426 moves/=moves/+! 
43@ ENDPROC 
446 
456 DEF PROCpTot 
440 PROCFI1iCkey%) 
478 IF Key/=1 THEN PROCEi11¢2) :PROCEi11¢4) 
496 IF KeyA=3 THEN PROCEi11¢2) :PROCFi11<6) 
496 IF Key#=7 THEN PROCHI11¢4) :PROCEI11¢8) 
568 IF Key4=¥ THEN PROCHI11¢4) :PROCEiTT <8) 
518 IF key4=2 OR KeyZ=8 THEN PROCHIT TC Key/-1) sPROCHIL)(key4t1) 
320 IF Kay#=4 GR key4=4 THEN PROCHI11(KeyA-3) sPROCS ITT Key443) 
538 IF key#=5 THEN FOR K=2 TO 8 STEP2:PROCEi]1¢K) sNEXT 
S4@ checkZ=TRUE:FOR Kai TO ¥scheck¥echeck4 AND numberZ(K) :NEXT 
308 ENBPROC 


348 

378 DEF PROC#iT| (num) numbers Cnumé SNOT number”( nuns) 

388 GCOL3,2 

398 MOVE cnrxACnums) caryACnums) 

666 MOVEcnrxAé(numé) +258 ,coryAd mums) :PLOTSS ,cnpxd(numé) +298 ,caryAé (num 
#)-258 :MOVEcarxA(oumé) .caryéCnumé)-206 sPLOTSS ,carxé(numé) ,caryénums) 

618 DRAW carxé(numé) +258 cary (nuns) -258 

i ENDPROL 


638 

648 DEF PROC€again 

658 PRINT’’’:FOR K=l TO 2:PRINTCHREL4ICHREi3I'You completed the 
ZAPPER in only" sNEXT 

468 PRINT 


674 FOR K=1 TO 2:PRINTCHR$1 41 CHRS1 3BTAB{ 15) ymoves/:" moves!" :NEXT K 
eee ares K=1 TQ 2:PRINTCHRSI41CHR$i33"Ancther game Y/N 
699 REPEAT: K=GET:UNTIL K=@9 OR K=78 

768 JF K=89 THEN yesA=TRUE ELSE yesv=FALSE 

a ENDPROC 


? 
736 DEF PROCheader 
ae K=] TG. 2:PRINTCHR$1 41 CKRS$) S4CHRS157CHRE1325PC12°2 A PPE 
758 PRINT’ CHRS129TABC12) "by Neville Tomlinson" 
76@ ENDPROC 


778 
798 DEF PROGinstr i 
798) «= PRINT’’CHRS138"The object of the ogame is to fill 


A A AN Gees Sele GA ha GA lh mee ea cs yee ey SP A a YS ei I lie eres velin hes ee 
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all’ “CHR$i3@"nine squares." 

868 PRINT*CHRS{34*Your contrals are the Keys ! to %.° 

818 «PRINT’’CHRSI33"However, the tricky part is that 
when" ’CHR$i33"you turn any of the nine squares on, jt” CHR$133"reverses 
the squares directly adjoining CHR#1332° it! !" 

826 «=0PRINT’’CHRS131"1t’s «not as easy as it sounds - 
the" ’CHR#1S1 "minimum number of moves 1S Jisee” 

$38 PRINT’ “CHRSISICHRSISZCHRSI29"Press the space bar to start... 
"CHRS 156 

848 REPEAT UNTIL GET=32 

858 ENDPROC 


THE ENIGMG SOLUTI OF 


Some of you will recall the ENIGMA puzzle, derived from "New 
Scientist", which I pesed in the October Beeblet. To recap, ENIGMA is 
exactly divisable by EE NN II GG MM AA BB and CC, Each individual 
letter represents a different digit (@ to 9}. Which number does 
ENIGMA represent? There is only one correct solution. 


A little thought simplifies the problem.!. It is not meaningful te 
divide by zero therefore no letters represent zero. 

2. ENIGMA must be even (it must be divisable my 2 or 4), 

3, It cannot end in @ or 5 therefore is not divisable by 9. No letter 
represents five. 

4. The biggest number ENIGMA can represent is 787643, the smallest 
123467, 

5. The lowest common denominator of the remaining digits tie 0-9 less 
0,5) is 5544. ENIGMA must be a multiple of this. 


A number of other deductions are also possible (eg. either B or C is 
i), however this is a good a point as any to launch into a program. 
Here is the program suggested by Steve Wozniak, inventer and marketer 
of the Apple (he came over for a champagne breakfast with the 
Wellington Apple group): 


{ REM ENIGMA NOT DIVISABLE BY @ OR 5 

2 REM ENIGHA DIVISABLE BY 7,8,9,11 

3 REM ENIGMA 1S A MULTIPLE OF 5544 

4 REM ENIGMA ) 127512 (5544223) 

5 REM N HOLDS ENIGHA 

& REM 1S DIGIT SUM, WITH CARRY. 

18 DIM NCS}: NOB|t: NCA=Zi NCDSI: NODES! NCD=l: N(DI=2: 0-8 


198 FOR 1=6 FO S:f=N(194¢1/244) MOD 640/16: N¢D=C MOD 18: NEXT 7: FOR 
d=9 TO 4: FOR T=d+1 TQ SsIF N(Jd MOD S=8 OR NCT=NQU) THEN 16@:NEXT 


i 
148 FOR J=5 10 STEP-i: PRINT NCE)3:NEXTI SEND 
742896 
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How to Write : 
ADVENTURE GAMES 
CREATIVE ASSEMBLER Wor te aed Acorn Eeces 
How To Write Arcade Games feter Kiityorth 
; i) CY 20, 6 rete Ree 


for che BEE Microcomputer Model 8 
aed Acom Electron 









two books to 
help you make 
the most of 
your BBC Micro 


CREATIVE ASSEMBLER: How to 
Write Arcade Games for the BBC B 
and Acorn Electron. 


A challenging, illustrated guide which 
introduces assembler instructions for 
the fast-moving and fun-packed arcade 
games, 
$16.95 


HOW TO WRITE ADVENTURE 
GAMES for the BBC B and Acorn 
Electron. 


Particularly easy to follow instructions 
teach readers who have started pro- 
sramming in BBC BASIC how to 
create more complex adventure games. 
$16.95 








available from bookshops 


and computer stockists 
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MENTAL ARITHMETIC GAME 
G.C.F. 


How many simple sums can you do in 46@ seconds, using only whole and 
positive numbers (integers) in the range 1 to 108, using addition, 
subtraction, multiplication and division? Here is a game to let you 
find out, 


This is the bare bones of a program for drill; ‘frills’ such as sound 
and graphics have been left out although even moving to a higher MODE 
will still allow plenty of memory for these. 


DESIGN NOTES: 

a) Should run as is on either Beeb or Electron. 

b} No negative or fractional answers, also avoid multiply or divide by 
zero or an answer of zero. 

c} All numbers to be one or two digits leng (although ‘10@’ is also 
allowed), 

d) each of the four arithmetic operators (+,-,#,/) should be tested. 

i use the conventional symbol for division, rather than ‘/’, for 
clarity. 

#) to avoid discouragement, correct answers bring a greater ‘reward’ 
of 1% points than the penalty for a wrong answer {1 point). 

g) a small element of competition is introduced by Keeping a high 
Score. 

h) use of special code and program techniques should be Kept to a 
minimum, 

i} to simplify typing in, single-letter variable names are used except 
where there is not an obvious one to choose {eg T% for Temporary 
variable, but op$ and time% are left in full) 


PROGRAMMING NOTES: 


To Keep all the numbers between 1 and 160, including the answer (') is 
not as easy as might seem before you start to program. You cannot 
simply select any two numbers in the range i to 196 and hope they will 
oroduce the type of answer you want, eg: 

43 +47 = 118 (too big) 

43 - 67 = ~24 {don’t want a negative answer) 

43 #67 = 2984 (much too big!) 

43./ 67 = 77 Qeads to fractional answers, or zero plus 

remainder) : 


For ease of discyssion, the corresponding variable names will be used: 
A%, B, C% - in the first example above, A%=43 B%=67 C%=118. First we 
find out how to generate appropriate values of A% and B% for addition 
and multiplication. 


SS eg SS GL a ee el rs rs ts er cr eg Pe Rh eee gee eg A es 


a a ie ie ee gene cr gray peggy ecg meg ce ces ce cre ec cc ccc cc ee ee ed ee eed lee ered ee ee 


For addition it is obvious AX=RND(G9) and so BR=RND(iG0-A%) - but what 
if A%=99? We would then be asking for B% to be RND(i) effectively, 
which will not give an answer we want. See Coding note fe), 

We can get the values for subtraction by noting that if CR=AKtB% then 
A%k=C%-B%. This is why in the program PROCsub calls PROCadd and then 
swaps A% and Ch! 


For multiplication we want both of A% and B% to be greater than 1; and 
C% not to exceed 103. Therefore A%=RND(S@), but calculating BR is 
trickier. Some possibilities: 

If A% is greater than 33 then B% can only be 2, since we don’t want to 
multiply by {, and to multiply by 3 would make C% too big. 

If A%=2 then B% can be in the range 2 ta 56; or if A%=3 then B% has to 
be in the range 2 to 33. 

Now 10@ DIV2 is 5@, and {0@ DIV3 is 33; sc that suggests perhaps 
BRE RNDU@@DIVA%). But that allows B%=1 again! How about 
BRAItRNDUiGeDI VA%)-1) Better, but we still have to avoid the 
possibility of RND(i) which would occur if A% was greater than 3. To 
avoid A% normally being larger than B%, we swap them 50% of the time 
(IF RND(2)=2...) 

For division we used the multiplication PROC and swapped A% and C% 
just as for subtraction. Provided B% is mot zero; which has been 
ensured in the program, C%=A%#B% then A%=Ch/Bh. 


CODING NOTES: 

a) Negative INKEY values - when you want the program to wait until a 
Specific Key is pressed, and upper or lower case isn’t relevant - 
‘Press space bar to continue’ you can: 

REPEAT UNTIL INKEY(-99), The INKEY(-99) Keeps testing the keyboard 
and will only let the program continue when space bar has been 
pressed, and no other Key. 

The same can be used for testing Yes or No -— INKEY(-69) or INKEY{-$é), 
with the added advantage of not having to worry if CAPS LOCK is on or 
oft! 


b) TIME - this measures time elapsed in hundredths of a second - which 
accounts for the number 60008 when we wanted 48 seconds from ‘NOW’, 


c) #FXi5,{ - if anyone has typed something (or leaned on the Keyboard 
accidently) this will clear if from the Keyboard buffer. 


d) LOCAL - this is used when the variable is only going to be used 
within the PR@Cedure; it is especially useful if there is a variable 
of the same name in the seqment of code that calls the procedure and 
you don’t want to corrupt that value of it. 


e) RND - produces integers from { to whatever number specitied (within 


reason and within parenthesis) - eg.to get any number up to 79 use 
RND(99) - but care should be taken if the argument (the value in the 
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parenthesis) i5 2 variable, as RND@) and RND() have special 
meanings. The IF statements in lines 34 and 72@ are there to avoid 
this problem. 


#) VDUZ3 - used to define a character which looks more like the 
familiar division sign non-computer people expect, 
Gg) CHR$ used to get the division character printed. 


h} DIV this 1s the fastest way of dividing two integers; when you also 
want an integer for the answer (eg 7DIV2 gives the answer 3). It is 
aiso better documentation, as it tells the reader that you aren’‘t 
interested in a ‘real number’ - a number that can have a fractional 
part - such as 2.0 | 


VARIABLES: 

A®% and 8% - first and second numbers in the sum 

C% - Correct answer as calculated by the program (eg Ch=A%+B%) 

H% - High score 

5% - current Score 

R% - Reply the user gave in answer to the sum 

T% - Temporary variable - only used locally; its value has no lasting 
Significance. 

time% - Time at which test is to end (approximately 6@ seconds after 
start). 

op$ - the OPeration symbol to be wsed (+, -,; *# /) In a sum. 





TABLE OF OVERLAPS 


In any graphics mode, there are 32 lines of text on a screen. These 
are divided evenly down the Y-axis graphics range of @ to 1@2d. Ue 
each character or line is 1624/32= 32 graphics units Cpoints] high). 


The character width varies according to the number of characters 
across the screen. For instance, Mode @ has $@ characters across. 
{200/80=16 so each letter is 16 graphic units wide. 


Mode6é 98 chars 16 graphic units wide 
Model&4 4@ chars 32 graphic units wide 
Mode2&é5 26 chars 64 graphic units wide 


So a handy formula. for converting TABX,Y to graphics co-ordinates js: 
MOVE char_width#X, 1823-(Y#32) . . 

char_width is the width in graphic units according to the Mode you are 
in. 
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18 REM MATHGE 
28 REM Game of Mental Arithmetic 
36 REM By GCF 69-NIV-84 
46 MODE 6 
5@ PRINT"You have 48 seconds to ans 
wer" 
68 PRINT‘as many arithmetic problem 
5 3s you can" 
78 PRINT 
88 PRINT"RIGHT answers gain 18 poin 
te 
98 PRINT"WRONG answers icse only J 
oint" 
199 PRINT TABCO, 23)*Press SPACE BAR 
to continue... 
116 REPEAT 
£28 UNTIL INKEY<-99) 
130 HA = 4 
148 REPEAT 
158 S4 = 8 
168 time% = TIME + 4088 
178 REPEAT 
188 CLS 
198 PRINT*Scere is °3543" 


is “iH 
268 TA = RNDC4) 
218 JF TA = 1 THEN PROCLadd 
228 IF Th = 2 THEN PROCusub 
236 IF TA = 3 THEN PROC_mul 
246 IF TA = 4 THEN PROC div 
oe PRINT TABS4,12) AAs" "sopds" "3B 


re JEX15, } 

278 INPUT" * RY 

288 IF Ré = (4 THEN S4 = S4 + 18 ELS 
ESA = S54 - 1 

298 UNTIL TIME > times 

388 CLS 

318 IF S4 = HA THEN PRINT*You have e 
qualied the previous hi score of ";Hy 

328 IF S44 KA THEN PRINT*You need b 
etter than "sS/:" to beat “:HY 

338 IF S% > HA THEN HA = 4: PRINT"Y 
ou have increased the hi score to ";HY 
ot PRINT TABC4,23)"Another game Y/N 


359 REPEAT 
369 UNTIL INKEY(-69) OR INKEY{-Bé4) 


hi-score 


fe gees A ae ad cc ee ce ee es ee ee 


es ee ee ee ee ee ee 2 es ee ee 


378 UNTIL INKEY<-84) 
386 CLS 


990 #FXI5, 1 
408 END 

419 

428 DEF PROC sub 
434 LOCAL Ty 
440 PROC_add 
458 op$ = *~" 
468 TL = AY 
478 AY = CY 
488 CY = Te 
499 ENDPROC 
568 


vi DEF PROCLadd 

328 ap$ = "+" 

338 AZ = RNDC?9) 

O48 IF AA = 99 THEN BY = | ELSE BA = 
RND¢ 188 - AAD 

soe CA = AL + BY 

368 ENDPROC 

2/8 


NBG BEF PROC_diy 

398 LOCAL Ty 

668 PROC_nui 

618 VDU23, 224 418,818,408 OFF £08 ,&i 
B,&18 ,&8 

628 ‘ops = CHR${224) 

638 TA = Aa | 

648 AL = CA 

658 CA = Th 

468 ENDPROC 

478 


488 DEF PROCmul 

498 LOCAL TA 

788 opt = "#" 

718 Ay = } + RNDG4 

728 IF AX > 33 THEN Bi = 2? ELSE B% = 
1 + RNDCC108 DIV A) - 1) 

738 TF RNDC2) = 2 THEN TA = AK: AA = 
BA: BA = TL 

748 CA = AA ® BY 

798 ENDPROC 


a ey Se eS ee a Se ere re ey A ire es ey ey ee ee ae ee is rie 


OSWOROD FROM Ba SIc! 
GCF 


INTRODUCT I ON 

You can use many of the Operating System routines without having 
to Know anything about machine code {! do ~- I’ve had enough 
experience of writing machine code for main-frame computers at 
work that ] will mot use it on the Beeb until I am absolutely 
forced to! - despite the "sase" of the Beeb‘’s assembler) 


In this article I want to show what is involved in setting up and 
using OSWORD functions. For a list of some of them, refer 9.45% 
User Guide, and chapt. # Disc U.G. (don’t be put off by its title 
"Using the filing system in assembler" ~- it can all be done from 
Basic), 


To make it easier to grasp, the following example uses an OSWORD 
function which does exactly the same thing as a ‘well-Knawn’ 
Basic command POINT. 


EXAMPLE: 

All OSWORDS follow the same general pattern: 

a) grab Some space - the amount depends on the particular OSWORD, 
This 15 called the PARAMETER BLOCK, It is used to pass data to 
and fram the OSWORD routine ‘eg DIM block% 4 - the space between 
Variable mame and number is needed; here it reserves 5 
bytes: 4+1) There is no harm in reserving more space than you 
need for the Parameter Block, 

b) point to it - the OSWORD routine needs to Know where the 
parameter Block starts. This is done by splitting the starting 
address into 2 bytes and placing them in X% and Yi. 

eg X*=hlocK%AMOD236:Y%=block®% DI V256 

c. select function - put the function number in A% so the OSWORD 
handler knows which routine to activate. eg A%=h09. It is 
tradition to use hex; this reads the logical colour of a pixel. 

d. Insert parameters - it is mow necessary to poke the parameters 
into this block (cRapt. 39 U.G. for indirection operators). eg 
in this example we must pass the qraphics co-ordinates of the 
pixel we are interested in, 

e, call it ~ actually you call a bit of code which jumps 
somewhere else depending on a vector. eg CALL &FFF4 
Understanding these technicalities is not essential to use OSWORD 
successtully. 

f. extract results - this stage is not required for some OSWORD 
functions such as “write internal timer” (A%=&64), and varies 
wildly for others eg. extract the ldgical colour of the pixel. 

gq. to reuse the same OSWORD function only steps d, e and f need 
repeating. 
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a cc GS yc al LS SS RTS eA SSP SP Sy piped: ll 


i@ REM OSWORD? 

2@ REM A direct equivalent of the BASIC command "POINT" 
3@ REM See USER GUIDE pages 322 & 462 

48 MODES 


58 
6@ REM a) Grab some space 
7@ DIM block®% 4 


30 

9@ REM 5) Point to it 
106 X% = block% MOD 256 
ise Y% = blocké DIV 256 


{2 | 

{3@ REM c) Select function 

£46 AX% = &09 

156 

1609 REM (select pixel to test) 

178 H% = RND(i279) :-REM horizontal coordinate 
188 V% = RND(99@) :REM vertical coordinate 
19@ GCOL@,2 -REM make it yellow 

at PLOT 69,H%,V% :REM plot the point 


229 REM d) Insert parameters 
238 ?block® = H% MOD 256 

248 blockh?71 = HX DIV 256 
298 block%?72 = V% MOD 256 
th blocky 73 = V% DIV 256 
28@ REM e} Call it 

At CALL &FFFI 


e 
316 REM f) &xtract result 
ae logical_colour®% = blockh%?74 


349 REM (print result - it should be 2) 
3598 PRINT logical_colour% 
368 END 


CONCLUSION: 


Yes, using POINT from Basic is much more convement;, but there are 
other, more useful OSWORD functions which have mo equivalents in 
Basic. Ome, such extracts the bit pattern of characters {(A%=86A) in a 
way that is Tube-compatible. People with disc systems can also use an 
OSWORD (A%=8&7F) to read ANY sector on ANY drive. 


I have prepared articles on the following QSWORD functions: 
AX%=80A ~ Display Character Matrix 

A%=&8B - Find Actual Colour 

A%=&7F - Disc Sector Verity 
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ERPIT CHa RACTERS— I! 
Neville T. Ch’ ch 


Last time — described a short procedure which allowed you to design a 
used-defineable character om the screen, and which could then be 
automatically poke it into memory, hence defining it for you. 


Now let’s looX at how we can pull a character out of memory; edit it 
on the screen and then restore the edited version back in memory. 
This 15 a Jittle more complicated. However once we have the 
information and displayed the character; we can use the procedure 
developed last time to do the editing and restoring. 


We Know that characters are stored in sections of & bytes in Page &CO@ 
to &CFF; the first & bytes corresponding to CHR$224, the next & to 
CHR$225 and so on up to CHR$295. 


90 a formula to find the first byte of any character is: 

(char-224)#5+8C00 
Now here is a routine to pull the information out of memory and 
display it in block form on the screen: 


16 MGDE7:INPUTTABCI1@,18)°Edit which character ",char 

28 MODE? 

38 FOR 1=8 TO 7svalue=?C(char-224) 48+&C88+]) 

40 FOR J=8 10 ? 

38 JF yalued=2*C7-J) THEN ?CHIMEM+ +1 #46)=205valuesvalue-2*¢ 7-u) 
68 NEXTJ:NEXTI 


That 15 all there is to it! We input the character to be editted, 
store it in the variable ‘char’. We then use two loops. The outside 
loop (7 in line 3¢@) steps through each of the 8 rows of a character. 
As each row is represented by one byte in memory, this loop reads the 
appropriate byte each time round using: 

fchar-224)#8+8C0e+]) -see Oct Beeblet. 


Line 5@ checks to see whether this block should be printed on screen 
by comparing it ta the column value. Hence at the beginning of the 
sel J=O, 2°79) =2°7 or £26, whereas at the end J=7 so 2°(7-J) 
= 2°O = { 


If the Block should be printed, the ASCII value of a solid block in 
Mode 7; CHR$255, is poked into the correct location of screen memory. 
This displays thé tharacter. 


The whole procedure, using the previous article’s routines and the one 
above is as follows: 


ey Fa ee My eae a aad A An A A, ee ere ees es ere re ee ee ee eed eee eile eee ems eet dere te ere eit ie 


mck SEC se ce ee ee ei cle ett ee ee ee cy, ee ee ee ee ee ee ee ed ee ee ee ee eee ee ee 


16 MODE7s INPUTTABC1@ ,2@3"Edit which character ",char 

28 MODE? 

38 FOR 1-8 10 /:value=?( (char-224)%8+aC@+ 1) 

40 FOR J=8 TO 7 

D6 IF valued=2*¢7-J) THEN ?(HIMEM+J+1#46)=255 val ue=ealue-2*(?-J) 

_ 

188 XE Y=: REPEAT :PRINTTAB(X , Y) 5 sQ@GET sX=(X+ ( Q=98) -(G=8B) MONG s Y¥=(¥+(0558)-(8 
47) MODE sX=X-€X (8) #8 Y¥=¥~-CY (0985: 2 CHIMEMEX $Y 448 = 2292 F INT ILO=83 
118 J=O:FOR Y=6TO7;C=8sFOR X=O707 sC=0+(2*¢(7-X) AND PCHIMEM#X4¥%49)=255) sNEXT 3 P 

RINTTAB(27 ,Y) 303 ?¢¢char~224) a84&Ch8+ 1 =C 5 1=1+1 NEXT 


Line 19 asks for a character, line 2¢@ displays it. 

line 3@ prevides on-screen editing in this way: 

Z (left) X (right) +: fup) / (down) §& (finished) <space? to print 
a block. 

line 48 restores the (mew) character to memory. 


Well, what are you waiting for?... Go to it!!! 


COPROCESSOR SCREEM DUMP 
thanks to Neil G for explaining 


If you have the source code for a machine-cede screen dump which warks 
for a Beeb without an active co-processor then it can also be used 
with an active one. 


Change the Load Address so that it will load at A1F@@ in the 1/0 
processor and set the execution address accordingly. If this has been 
done correctly then doing #INFO on your disc system should show that 
the load and execution addresses are prefixed by "FF", This means 
they will load and run in the 1/0 processor. The reason for the 
Particular address chosen is to avoid glacial parts of the 1/0 
Brocessor used im handling the Tube as well as the expanded 
User-defined character set area - not to mention the disc bufter 
APO a Ser 


Say your dump routine is called CODUMP. You can activate it from a 
Basic program in the co-processor by #RUN CODUMP,. This will fetch the 
program trom disc, produce the screen dump, then continue with the 
Basic program. 


WANTED 
An explanation of how to run CODUMP in the I/O processor from a Basic 
program running in the co-processor, once it was loaded. 
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G HEX OM THaT CHReRACTER! 
Anne F. 


IT can’t add up! (or, not as accurately as I used to} So to expect me 
to add up 128+32+&+1, or some such combination to arrive at a User 
Defined Character and get it right, is really asKing a bit much. The 
calculator always needs recharging, the computer is laborious, and 
anyway, am I sure that I’ve got the right column to add in in the 
first place? 


I work in hex (gulp) but cheat (hurrah!) - with a look-up table beside 
me. Each combination of squares has a single value. For instance: 


CICICi a this is "1" 
ape ae this is "2" 


Ct el this is "7" ar b+24+)] 
SB eCicl this is "C" or 8+4 = i2 
Ce oe this is "7" mr 4+2+] 


My character is staring me in the face, all neatly divided into 
Squares, sc it makes sense to take advantage of this and forget the 
arithmetic. Great, marvellous, but the examples above only deal with 
4 squares, and a character has & Isn’t there going to be some 
arithmetic anyway? No - you just put the two numbers side by side and 
the computer is happy. For instance: 


BBKICICICIMME = CS tproeperly &CS or 1+2+64+1267> © 


Here is a look-up table and an example 
CCICICI | 
COIiLICl 
CICIMCI 
CIC a 
CIM CICI 
Ci a ae 
mr Oe 
mr 
@CICICt 
SCC 
CIM] 
om 
LP es 
a a Cs 


| 

Cc] 
oc 
Cit 
His 
ae ee 





CUUUINOIUU 
ONNNNAAIN 





Ci 

st etet-te 
wEHHEH 
Hedee 
CIty aT a 





DOOCCGUo 
CSREES 







ee 


THOODS WONTON 





ee le A EP cy ee ee se ssh eli A SP: PLS A SS re uA SD MERA A SS SS Sp cee wee SO: AA PA: GO SS GA AA ASP SOS SND POPS “SPD PW mp me ene enh 


i 


By compari m4 each row (half at a time) with the pattern in the table, 
you can quickly arrive at the number that represents that row. 


Using hex consistently soon gives you a feel for a shape too. Did you 
notice with "C3" that 3 15 the reverse of C’ 

Or that in the full character above, the top line is repeated at line 
7, that moving in towards the centre from lines 1 and 7 the rows are 
the same until line 4 splits them? 


Try converting the following shapes to hex: 





wie | ee CIC 
ae eee Pe 
sletst-tetefedmmet ilatotal fe 
WO@OC@LICI mat ft ete 





Taking the first one, 


BMClCICIMMCICIMN means %99 
BCCI Omeans & BE 
PM means &FF 


a. and $0 On. 


By avoiding arithmetic, and having a table handy to compare the shapes 
with their value, it is easier to find an error in a definition and 
correct it. Also when typing in definitions it is also possible to 
omit a number, or add in an extra one. Using hex, such a definition 
stands out like a sore thumb, because all the definitions look as long 
on the computer screen. Spot the odd one below for instance: 


_ YDU2ZS, 240 ,&79 ,&BS &PF ASC asl &F9 ,&SA 24 
UDUZ3, 241 ,&3C, &42, & SA, &BD, &BD , 5A &4a2, &3C 
VDUZS, 242, &06, | A, &1C, AE, KC, &1 8, &10 
YDU23, 243, 24 | &25" &24 ,&AE , &35, RAE, & &77 

VDUZ3 , 244, /&86 88 &88 &18 ,&38, &58 £18 ,&28 


(Add &AA to the end of CHR#243 to complete the pattern.) 
AMPERSAND: 
This is the word to describe the character that looks like & and 


means a number following it is a hexadecimal number. It is on the 
Keyboard on top of the number 6 Key - to get it; press SHIFT and 6. A 


ee ees RA Me air es ee Aga eye ce ee A-Select SP ge ge Ee re eg ee eel A ee ae ee el 


ee eee eg eee ee 
eh a ey ee 
EE A ae a SP PS ey FES ees mp ety feel NG WEES dei — 
se ee US “rie 


quicker way to set up lots of character definitions is to define a red 


c 


For some reaon you need the broken-line charact 
definition, otherwise the comma doesn't appear 7 er at the start of the 


JIISIGIOIIIIISIIISO SO ISGIGI ISIS ISIS SS IGS SGI 00000009 


MWIEW KEYS 
Don A Tokoroa 


To make use of the red user-defined Keys in Command Made, set them in 
the normal way, type #FX228,4 and access their contents by holding 
CTRL+SHIFT while pressing the U-D key. This overcomes the problem of 
having the text mode reset the user-defined Keys to its own purposes 
when the command/text mode toogle (ie ESCape Key) is used. 





Neil wanted a Hi-Res Logitec screen dump. No joy from our members: 
Jeff Aughton’s excellent book ;iovaluable Utilities for the BBC Micro” 
nub. Pan was much more use. Neil also recommends the Graphics Al 

program, to which he has added dotted line, arc and ellipse drawing 
functions as well as the screen save and printer dump utilities found 


in the book, 


&3C HEBRAES 
x3 2 MH uae 
9 RRB 
| bed Fee td © is CHRS(€2235) 


cal Bamanese 
e99 ed ESET 
£42 Beseeee 










ROD StH 

cit So eumuae 

ete eee 4is CHR#(276) 
&7F HE Rae 

&PfF 

2.68 ueeuaee 





be ee ee ee 
A lhe 
LS A SS ST Ss YA A PP SS nls ae nen te 
a let gy ee ee ee 


4c 


DISPLAY ei hal MAT RIX 
CF 


This program finds the bit patterns used to define the various 
characters and displays the $x pixel matrix in an expanded form. On 
the left hand side the hex values required to define the particular 
character using VDU23 are given. On the other side, the character is 
printed in normal size, with its ASCIT value in decimal. All the 
characters from ! (pling) to ” (tilde) are displayed in turn, with 2 
{~second delay between each. 


The program could be used to help understand how existing characters 
are defined, before attempting tc define your own. For mast 
characters the left line and bottom row are left blank. The only 
alphabetic exceptions being gJpoy. By using OSWORD with A%=88A, this 
program will work across the Tube. By changing the start amd finish 
Value you can display the current values (definitions) of the 
User-defined characters for the ASCII range 224 to 255. (eg 1¢@ FOR 
asc%=224 TO 255) 


18 REM GSUORDA 

26 REM This ’reads’ a character definition. 

36 MODES 

48 VOU23 , 224 ,&55 ,&2A 455 £24 859 £28 &55 £08 

50 VDU23, 220 k7F y&7F LATE ATE , £1: ETF WIE, kaa 

68 DIM block’ 8 

76 AZ = &BA 

88 X% = block% MOD 254 

98 YA = block’ DIV 256 

198 FOR ascé = 33 10 126 

118 0 Pblock% = asch 

126 =6CALL &FFFI 

{36 PRINT *7? 

14@ FOR TZ = 1708 

158 byted = blockA?IY 

149 PRINT ’ "&" + RIGHTS(STRE"48188 + byte4),2) + * "3 
178 FOR JZ = 7 70 8 STEP -3 

186 IF byte% AND 2°0% THEN VDU225 ELSE YDU224 
198 NEXT JY 

286 IF 1% = 4 THEN PRINT SPC(4) CHR$Casc4%) “ ts CHROC™ ascA")") 
219 NEXT IA 

228) owait = INKEY(168) 

236) = NEXT _s asc 

248 END 
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CROSSWORD 
Neville T. Ch’ch 


All the words used are terms related to the Beeb or Elk; in fact all 
the answrs can be found by scanning the Users Guide. 


ACROSS: 
1 Government takings for wrong-doing? - also error 16 (6) 
4 Error with huge numbers (3,9) 
? Reaction to a red light (4) 
1@ Event Vector (5) 
ii Substring search (5) 
13 Minimum abbreviation of RIGHTS (2) 
14 Hex ASCII of ’?’ in MODE 7 (2) clue: It’s >120 
15 Parameters of 3-8 of 73 down () 
2@ Not considered viable by structured programming buffs (4) 
21 Hex 174 (2) 
23 Find a file to read from (é) 
2o Assembly mnemonic that puts a value in the Accumulator 
2? What do a cassette recorder and car have in common’? a #call too (5) 
2o abbreviation for CHR$3¢ (2) 
31 BASIC conditional execute (2) 
33 Modulator demodulator (5) 
34 Request for servicing by the 65@2 (3) 
35 7,! and $ are all examples of these operators (11) 
38 Abbreviation for the VDU code to move the cursor up a line (2) 
46 Bank on the cassette! (4) 
4{ The il screen memory mode (8) 
4? Access speaker output (5) 
45 Powerful raising (3) 
45 OSWRCH address (4) 
49 Quarreis (9) also an error 
93 MC error/listing suppress or OS call (3) 
vo abbreviation of 3 down (3) 
36 In some cases, this is what a monitor is called... in others... (3) 
of Visit a friend or execute some machine code (4) 
ve Mistaken line! (3) 
9? The heart of a computer ~ ours is a 6562 (3) 
66 VDU @ (abbr) (3) 
61 Digital opposite (eg in joysticks) (8) 
564 &FDOO-&FDFF (3) 
66 6922 chip (3) 
71 timber-chopping tocol mis-spelt (3) 
72 #FXL9 waits for it (5,45) P.S. use NZ spelling ’s’ not ’2z’ 
¢? abbr for the RETURN-generated, character (2} 
79 Hex for ASC of a teletext star (2) see 14 across 
2 Whole number part of division (3) 


ee ee re ied ll EE a eS A Lh SA Ak SA SA oa Sa Py ly AA AD A Ps ed er A er Me 
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e4 The 6502 has 3: Asx, ¥ (9) 

6 opposite to $i down (é) 

S& reset all variables and arrays () 

&9 Put A Register in the Stack (Assembly mnemonic) (3) 

94 Disc interruption (3) : 

92 Assembly comparison mnemonic (3) 

93 Hex value of a semi-colon’s ASC times the number of 
Analogue/Digital Converters on Model B Beeb (2) 

94 activates a Keyboard LED (4,4) 

9? The smallest graphics unit (5) 

9¢ Renumber error, dope! (5) 

{9@ Using VDUs hex value of (cade ta switch on page mode * code for 
defining text colour) (2) 

101 Not so bright (3) 

102 Size of a dise file (3) 

193 CHR$69+é66 down (4) 

104 Grab a variable from a line in the program (4) 

105 Spin left (Assembly mnemonic) (3) 


CO OLIN 


opposite of page mode (CHR$i5) (6,4) 

maves text cursor (3) 

Motorola’s video chip in full {11,5,5) 

O5 command to move the monitor display (2) 

conditional branch for GOTO, GOSUB (2) 

wait for input (3) 

VDU abbr for CTRL-A (4) 

Mathematical food? (2) 

rowboat conditional (2) 

i@ Community sharing af BBCs and peripherals (6) 

{2 circular crime (3) 

146 chops those decimals! (3) 

{7 opposite of 67 down (3) 

if ALMOST duplicates POS ) 

i? Data Transter Rate (4) 

2i name for CHR$44 (2) 

22 & one-of-a-kind % down (3) 

24 Repeat FOR (4) 

26 Model B has slots.for 3 of these (3) 

2? the 65902 halts its present task for one of these (9) 

39 look at a program on the screen (4) 

34 input/output abbr (2) 

32 subroutine Keyword that only returns one value {2) 

36 wipe the screen clean (3) 

37 always comes before you write a PROC or FN (3) 

7 oe location in page zero holding the current value of 1% down 
ex) ¢ 

4@ 05 command used in program merging (5) 


MOCO “JO OF) 09 hoe 
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4tb common timber? (3) 

43 opposite of STATIC (7) 

44 choose a colour to draw with (4) 

47 VDU abbr for defining text window (2) 

45 an entirely optional Keyword; need never be used! (3) 

49 joystick port or assembly addition mnemonic (3) 

9¢@ abbr for your quide {2) 

51 logical opposite of zere (4) 

32 radial opposite (3) 

34 circular shade of brown! (3) 

62 store a value in Y (assembly mnemonic) (9) 

63 the number associated with 5% across (3) 

63 comnection between 2 pieces of equipment (9) 

66 decimal value of a string (3) 

47 gives you the ASCII code {3) 

6% minimum abbr for the Keyword reading the internal clock (2) 

69 finish your program here (3) 

78 YOU (also 58 down abbr’s first word) (4) 

72 OSARGS hex address (4) 

73 letter storage ~ Sound advice! (¢) 

74 used to print multiple spaces 

79 Not Applicable (2) 

76 OS call at &F FDS (6) 

7& BREAK is a soft one; CTRL-BREAK a hard one! (5) 

#8 the 2 letters common to all calls in memory in the &FFOO-&FEFF 
range (2) 

si type of data transfer, but not what you would eat for breakfast (4) 
&3 minimum abbr for a versatile command that even fills triangles! (2) 
&5 hex value of #FX call to insert a character in the Keyboard buffer 
(2) 


7 start of variable storage space (5) 

96 base 16 numbers (3) 

94 graphics equivalent of 34 down (3) 

95 assembly mnemonic to set interrupt (3) 

96 assembly mnemonic to wipe the evidence of an overflow (3) 
97 where we’re up ta in a disc file (3) 

9% opposite of 64 down (3) 

99 non-synthetic timber? (2) 

162 hex of #FX call to disable the ESCAPE Key (2) 


RS ws ns wel sen wow Ps Mea a a RS A A A AGA GGA a NAM la A aa A A A Pe 
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GRAPHS or... 
I"“PMt SICK GF NUMBERS 


Anne F,. 


There comes a time when lists of numbers become meaningless, just so 
many digits dripping off your hands (and toes in summer). What is 
meeded is a pictorial or graphical way of showing quickly what such 
lists of numbers look like, and what the relationship between them all 
is, Since that can be more meaningful than the specific numbers. 
(Which gives you a better feel for the time’: a digital clock saying 
"9.07" or an analogue one saying "almost 1@ o’clock! Time for bed!") 


The program here is an extension of the one calculating a woman’‘s age. 
AS I was using it; the data was all read in from a disc file. However 
here it is presented as Data statements. It draws two graphs, Again, 
it looks ike a long program, but that is because it is not a "bare 
bones" program ie one that says in the explanatory text "add sound, 
graphics, colour...’ though I must contess I’ve ignored sound 
completely here. JI have; however, gone to quite a bit of trouble to 
polish it; and done things which wouldnt be apparent unless they had 
mot been done - if then. If you have your own set of dates to use, 
use them to replace those in lines {6590 on. Also change the value of 
count® in line 15. 


Graph 1: PROCmonthgraph 
A bar graph: at a glance you can see what is the most popular month 
for people te be born in. You may recall the graph on p.4@ U.G., done 


in Mode 2; with lots of colours available. I don’t like this mode 
Because the characters are too fat. Instead I’ve taken advantage of 
the ‘Impossible Colours’ routing in Feb’84 Beeblet, and used Mode /. 


MOD colours 

MOD 1s a very useful command for when you can’t be bothered specifying 
each time which in a series of numbers, colours etc, you want if you 
are wanting to cycle through that series: 


37@ TF numberinmonth“¢lx) > @ THEN 

PROCbox¢ IMMOB4 , TADIVG+1 ,Xx+12,Yoffset! xXAtwidth4, 74) 
IF anyone was born in the month 1%, draw a box. Use for the first 
colour, the remainder of 1% divided by 4, This means the first colour 
will cycle round 4 possibilities in order: 
I% = 4 so I%MOD4 = 0; 1% = 11 s0 IAMOD4 = 3 (ie 3 is the remainder 
when you divide 11 by 4), 
The second coloyr is I%DIV3+1. 1 is added to the remainder, so this 
colour will never be colour @. 
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OFFSETS... 

When I originally wrote this program, 1 was defining graphics windows 
to produce the boxes. This implied havoc if I used the VDU2Z9 command 
to set the origin of the graph axes. So 1 faked this by Yoffset% which 
starts the graph so far up from the bottom of the screen, and Xotfset% 
which starts the horizontal axis in from the left of the screen. 


zwAND OTHER VARIABLES 

Designing a screen is only approximate, so it made sense to make every 
possible co-ordinate a variable ~ especially when they interact with 
other co-ordinates - as it 1s easier to change any one, and Know that 
all occurrences of it will also be changed. For instance, width’% in 
PROCmonthoraph. This variable is how wide each box is to be. It is 
used not only in making sure each month’s box doesn’t overwrite a 
previous one etc, but also to centre the month mame under the relevant 


Dox: 

378 MOVE X4t(width4~-32)/2,texth:PRINTmonthnames 

ie however wide the box is, subtract from it the width of the 
character representing the month name, and divvy up on each side of 
the character the remaining space. 

When deciding what to put where on the screen, you are working in 
generalities first, so you might as well make the program as general 
as possible - lock how I was able to lift PROCbox out of another mag. 
I only omitted one line; and changed the mame from PROC_M1i@, This 
leads us on to... 


FROCreararach 

This graph takes advantage of PROCproduce_sorted_list which sets up an 
array of pointers which tell the computer what order to pull peaple 
out of the other arrays to be in order of age . ZI gave up on sorts 
when my Apple Pascal tutor set us an exercise to sort 10 characters 
into order without using arrays. So ask Gavin how this one works 
(with arrays). 


I don’t Know how many people are going to be in your DATA statements, 
but I intended them to be evenly spread up the screen - 4 people would 
be displayed over the same area as 2@. In practice the program can 
only cope with 32 people before their names start to overwrite each 
other: 

count®% is the number of people PROCname has to print up. Ywidth% is 
the amount of space ¢Y co-ordinates) available after reserving space 
for the title and the bottom offset (1024 -Yoffset% -32 which is the 
height of characters for the top line) 

By dividing Ywidth® by count’ each person will be spaced evenly. 


This same principle is applied to setting out the age range across the 


screen: find out the oldest age and use Awidth®% to space the age range 
evenly across the screen. 
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PROCage points 
This provides some reference points - it prints age across the screen 


in tens — 10,26,3¢... up to max_age%. On most graphs, such labels are 
along the bottom (as month names in the first graph}. However I felt 
they would be a little more meaningful halfway up the screen instead, 
Since a splodge is placed at the age of each person, rather than a 
line drawn connecting each point. 


COLOUR 

Besides that of the first graph, which is a special effort. Notice 
the colours chosen in the second: yellow names and splodges, purple 
reference points - en my monitor at least, this gives the illusion on 
the references being further back, as a background in front of which 
individual people are placed, 


OTHER PEOPLES’ GRAPHS... 

Iwas typing up a load of material from other members for the Beeblet 
Editar, and came across two little programs, both doing pretty much 
the same thing, but graphing the results in different ways. On one, 
the Editor had written "Steven, write some blurb". On the other; 
Anton had written the following: 


This program is simply a way of illustrating the areas of BASIC that 
contain statements. A permanent sink of 13 is put on V% and an 
increase of 10@ every time an ASCII value is found either in the BASIC 
ROM (88000 to &BFFF) or in the OS (&C09@ to RFRFFF), 


What both graphs are doing then, is chugging through these ROMs, 
looking for ASCII characters, and displaying on screen how many of 
each there are. This can be looked on in one of two ways: 

1) An intellectual exercise 

2} using the computer’s ROMs as a convenient source of data ‘anyone 
want to type in 32k of data for analysis?) 

In Steven’s program, one item goes off the screen (scaling?) - it 
actually represents the number of CHR$32 (spaces) found, | 

If I’ve misrepresented either of them, apologies, but 

1) you should have written something or more, 

2) Deen available when 1 prepared this. 


FINALLY... 

é limitation of all four graphs is that they only show points based 
on two items (number in month; per month; name, age; number of times, 
ASCH] value of each). When more than this is required to be 
visualised or compared, there are other methods: 

Pie charts {as in Jam ‘83 and. March ‘83 Beeblets - copies still 
available $2 each from the Secretary) 

and something lurking on one of our discs under the filename "GERPH", 
But that’s for another day secssss: 
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REM *#*#% CUMULATIVE FREQUENCY TABLE *¥* 
REM #*#* OF ASCII IN BASIC ROM *#% 


REM ##% by Steven, March “S84 *#% 
MODE1 

DIM TAC2Z53) 

YDUZS,1,8363;6;9;:REM cursor off 


REM the above line is for OS 1.@ - OS @.1i should 
U.G.p.77 
VDUZS 15058; 


108 PRINTTAB(8,1)°1400" ;TAB(2, 31) 378" : TAR 37, 31)°255" TAB 


(6,8); 
116 
126 

ROM 


138 
148 
158 
168 
178 
188 
196 
268 
216 
220 V 
236 


CHRF1 1 
MOVE 1828 ,@:DRAW -7,6:DRAW -7,1823 
FOR DY=kB008 TO &BEFF STEP &108:REM look at BASIC 


FOR PA=@ TG 255 
MA=DA?PA 
TAMA =TACMNA) +4 
NEXT 


PRINTTAB( 1,0) *PAGE &* j~D/ 
FOR SZ=@ T0192 STEP 4 
MOVE S%,0:DRAW S%,TACSY%DIVA) 
NEXT SY’ 
DU23 1,1 ;856505 :REM 
1:8:6:3@:: cursor on 
PRINTTAB B(i6,2); 


REM *#* ASCII SEARCH PLOT #x% 
REM *** by Anton March 74 


MODE 1 
VDUZS 95288 5 
BAr32 
H4=8192 DIV By 
FOR I4=1 TO 4 
MOVE TAHA, S66:DRAW IZneHA, -266 


NEXT IA 
MOVE 4#H4,8:DRAW 6,6 
VAH=E 
FOR M4=&8888 TO &FFFF 
Na= 7M 
1F N44? AND NAC?! THEN V4=V44+166 
WAEVL~13 


PLOTS’, (MA-&8606) DIV BA, VA DIV 186 
NEXT 
END 
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18 ON ERROR VDU4, 26,28 REPORT :PRINT 
" @ line "sERL:STOP 

26 REM produce some graphs based o 
n "Womans age" (Beeblet Nov’ #4) 

36 REM by Anne F 

46 REM Sept ’84 

38 

68 MODE! 

78 PROCinitialise 

88 PROCmonthoraph 

9@ PROChold 

166 PROCyeargraph 

118 PROChotd 

128 END 


138 

148 DEF PROCinitialise 

158 thisyear#=1984 

168 counté = 15 

178 DIM names(count/) yearAtcountA) , 
trontha(counts) ,dayAtcoun ta) 

186 DIM numberinmonth4¢12) : REM use 
d for PROCwonthoraph 

198 DIM positroninlistA(count%) : 
REM used in PROCyeargraph 

286 DIM monthname$¢! 2) 

216 PROCtil tarrays 

226 VOUZ3, 224 ,&68 ,A1C &2A 468 408 88 
§ 888 ,408:REM up arrow 

238 YOU23, 225 ,&81 DB &E7 ,&DB £9? 43 
C ya7E £68: REM ange] 

"240 "UDU23, 226 488 ,&G8 £08 WS S88 42 
A&I ,&68: REM down arrow 

a ENDPROC 


276 DEF PROCfiliarrays 

288 RESTORE 1648 

298 FOR 14 = 1 TO county 

309 READ name$(1%) ,year4(1Z) jmonth 
ACA) ,dayAt TA) 

318 NEXT TA 

pet REM set up array for PROCmonthgr 
a 


p 

338 FOR I4=1 T0 count% 

346 = number inmonthéA(monthici4)) = a 
umber inmonthéA(mon thf) + { 

358 NEXT IY 

368 RESTORE 374 

378 DATA J,F MA MJ,J,4,5,0,N,0 
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386 FOR I= 1 10 12 

396 = READ mon thnames(]/) 
466 = NEXT IZ 

418 PROCproducesorted_! ist 
428 ENDPROC 


438 

448 DEF PROCmonthgraph 

456 LOCAL I4,XA,YA,Xoffset%, Yotfset 
Ay widths, textZ 

4é8 Xoftset' = 44 

478 Yoffset% = 256 

488 width#=88 

499 text/=208 

388 YOUI9,3,4,8,8,8:REM blue not whi 


te 

218 PRINTSPC4; "NUMBER OF PEOPLE BORN 
EACH MONTH" 

228 REM calculate and plot bar graph 


$ 

538 VOUS 

348 FOR 14 = 1 TO {2 

2000 XA = IA ¥ width” + Xoffset% 

248 YA = numberinmonthZ(l4) #% widt 
héA + Yotfsat/ 

378 =F numberinmonthACiA) > @ THEN 
PROCbox( EANOD4 , TABIVS+1 ,X4+12, Yottset 
AyxAtaldths YA) 

388 =©6GCOL4,@ 

098 = MOVE Wt width B2)/2, tex tArPR 
INTmon thnames¢ 1) 

698 NEXT IX 

618 REM put numbers up the Y-axis 

428 FOR 14=8 TO 7 

639 YA TAtwidthszrYot tse th 

649 = MOVE oe -32 

634 sCOL8,3 

6468 oF 1238 THEN PRINT TA 

476 GEOLB,6 

486 MOVE (BB ,Y% 

698 = DRAWI279 YA 

768 NEXT 

718 VOUd4 

720 ENDPREE 

738 


748 DEF PROCyeargraph 

798 LOCAL JA,XA,YA,Xotfsets, Yotfset 
ay AWIOthA, Yui dthy, ‘max.age% 

268 Xoffset% = 256 

778 Yotffsets = 64 


* 
ee ae a ee ae 


788 Xwidthé = (1178-Xoffset%) / (thi 
syearé~yearA(pesi tional isté{coun ty) 


798 Yutdths = 928/¢counté-3}) 

G68 max_age/=thisyearA-yearA( posi tia 
ninlistétcountZ)) 

Bib VDUZ8:REM reset logical colours 


to normal 

828 YOUI9,1 O;8s:REM purple not red 
or blue 
ae PRINTSPC?s"PEOPLE IN ORDER GF AG 


#48 VDUS 

858 PROCage_points 

868 PROCgraph_points 

876 PROCnames 

886 VDU4 

896 ENDPROC 

786 

918 DEF PROCgraph_points 
920 GEOLB,2 

938 MOVEXof tse 4% ,Yottse ty 
948 FOR 14=1 TO counts 
998 «= XA = Cyeardtposttionwinlistsd 
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1168 MOVE Xwidth“Z#14-16+Xottse ts 5) 
2:PRINT 1A 

1178 MOVE XwidthAe]AtXof fse ty 512-4 
BrVDU224 

1186 = NEXT TA 

1198 GCOLB,3 

1288 ENDPROC 

1218 

1228 

1238 DEF PROCpreduce sorted list 

1248 REM this PROC written by OCF 

1250 REM fiil array with order of age 

(year born) 

1268 LOCAL 14,dA mind 

1278 LOCAL TY 

1288 FOR TA = 1 10 county 

1298) = positioninlistZcd“) = TY 

1306) = NEXT IY 

1316 FOR 14 = 2 70 county 

1326 0 «omind = TA - 

1336 «=FOR JA = 1% 10 counts 

1346 IF yearACpositionintistadd 
AY)y > yearétpasttroninilistaédmina)) 7 
HEN mind = Jf 


1))-yearACposition in bisté¢14))) * Xw =: 1308 NEXT Jf 


idthé + Xoftse ts 1366 IF mind > TX - 1 THEN TA = pos 
968 YA = (4-1) % Yutdth’ + Yoffse oo itioninlistéACT% - 1): positioninit 
tZ StACIA - 1) = positioniniistadmind): 


978 MOVE XY, 7: V0U225 
98 NEXT IY 

998 GCOLG,3 

1904 ENDPROC 

1919 

1820 DEFPROCnames 

1838 GCOLG,2 


position.intisté(mind) = TA 
1378 = NEXT Ja 
1388 ENDPROC 


1399 

1408 DEF PROChold 

1418 #fx15,! 

1428 PRINTTAB(B, o1)"Press SPACE to co 


{848 FOR [4=1 TO counts ntinue’s 

1950 0 ZAC 14-1) #¥wid ths 1438 REPEAT UNTIL INKEY(-99) 

1948 MOVES, 2AtYottset? 1446 CLS 

1078 «= PRINT ;name$(posi tion_in_listsd 1458 ENDPROC 
YA)} 1468 

1988 NEXT 1% 1478 DEF PROCbox(C1% C24 ,LXA BVA RXA, 
1696 GCOLE ,3 TYA} 

$186 ENDPROC 1486 REM from Beeblet Feb ’84 "Imposs 
1118 ible Colours” p.i@ 

1128 DEF Aa 1498 LOCAL CA, CBA TA, YA 

113@ GCOLO,! 1508 CAVSCIY 

114@ FOR 119 TQ maxage% STEP 18 1518 CBA=C24 


1158 MOVE Xwidth“elyeXottset% 51244 1528 FOR YYSBYY TO TYY STEP 4 
8:V0U224 1538 GCOL 8, CAY 


ec cc cr re ee ee a ere, ii cel melissa eg ee ee eee 
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1548 MOVE LXY,Y% 

i558 PLOT 24 ,RXY, YY 
1548 GCOL 8 ,CBY 

1578 PLOT 21 ,LX%~4,1% 


15880 FARCAA 
1398 = CAZ=CBY 
1688 0 | CBY=TA 
1418 NEXT YZ 
1628 ENDPROC 
14638 


1648 DATA Adrienne ,$932,4,11 Margaret 
£958,7,23, Artie 1988,8,2,Baréle, 1988, 
8,2, Gloop, 1788 8,2, Doreen, 1943,46,18,Jo 
anne ,4943,3,38 ,Chris,£966,18,24 

1658 DATA Stephanie ,1959,16,3, Theresa 
192,412,246 Wendy ,1948,9, 28 

1648 DATA Mary ,1764,1,4,dutia,1993,2, 
13,Lynn,1939,5,26 Greta, i928 ,11,38 





SHALL 1 COMPARE THEE WITH THE LOWER CASE? 


Joe (Hamilton) offers the following hint: 

When running programs amd testing input given, these #FX calls save 
checking for upper or lower case. They are useful when you aren’t 
worried which is correct eg: 

INPUT"Enter Y/N" answers 

Here "y" is as acceptable as “Y", and "n" is cK as is "N" 


*#PX202 turns on both Caps lock and Shift lock. 
#FX262,6,100 turns on Caps Lock 
#FX202,58 turns off both Caps lock and Shift lock, 


Another way is by using INKEY minus. Both "Y" and "y" have the same 
value of INKEY(-89), "N" and "n" have the value INKEY(-34), However 
the implications of the FX calls above are far wider than this... 


EXHKHAK KKK K SKA KL HEHE EKER HEE EK EE HEHEHE KER KEE KEKE REE ERELEEREEERE 
(ADU 2G! 


Did you realise that VDU26 not only resets text and graphics windows 
back to their default settings, but also resets graphics origins 
shifted by the VDU2? command. If you have been busily using VDU2? to 
place graphics at particular points on the screen with the minimum of 
fuss, plus used a text window to Keep that part intact, it is most 
disconcerting to use VDU2é to reset X:¥ to 0,8 only to have the next 
CLG has wiped your text window as well! 
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MOYE TO FRINT 


When putting explanatory text alongside a picture or diagram, to look 
mice it often needs placing with greater precision than that offered 
by PRINT TAB. ea: 


16 MODE 2 

26 MGVE1G@, 266 

38 DRAW/G6 , 268 

40 DRAW4SE6 , 568 

38 DRAWI6@ 588 

6@ PRINTTABS 2,27) "triangle* 


AS you can see, the word “triangle” is mot centred evenly along the 
base of the shape. However, you can’t do any better than that unless 
you pretend the text is graphics and you MOVE the word to a mere 
Precise position. This is made easy by the VDUS command, This links 
the text and graphics cursors so that they move together. VDU4 
unlinks the cursors (one for the text window; one for the graphics 
window), 


For the listing above: 

In MODE 2 each character takes up 64 points across the x-axis 
(horizontal, across the screen: i2¢@points divided by 2@ characters = 
64). You have an eight-letter word which will therefore take up G#64 
points or 5izZ points. 

The base of the triangle runs from 10@ to 70, measuring 6@@ points 
across. 

The base minus the word length is 600-512=83. These && points have to 
be split eveniy to each side of the werd - 44 on each side, So to 
place the word centrally; you have to MOVE to the start of the 
triangle shape plus 44 to start the word. (MOVE 100+44...) The Y¥ 
co-ordinate can be fiddled in the same way. So delete line 60 above, 
and add in these lines: 


49 YDUS 

78 MOVE 144,164 
S@ PRINT"“triangle" 
74 VDU4 


Funny things can happen if you don’t separate the cursors (VDU4) at 
some stage, 


triangle triangle 
HKKKKHS 
stars 
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WaMiTED 
NOT-TOG-ADVANCED hardware projects. 


MORE listings of Fun, interesting (whose definition”), applications 
programs. 


#4$53,7 

A member has been typing im a machine code listing from a magazine 
(not ours), but Keeps coming across a pound sign. The program doesn’t 
work, On some orinters the Keyboard pound isn’t the printer’s pound. 
Quite often it has the same ASCII value as what on the Beeb produces a 
hash # symbol. If every pound symbol is replace by a # the program 
should work (or fall over from some other typo). 


NOT WANTED? . 

Feedback from a member re the latest cover: It makes the mag look more 

like an ornithological publication! Wouldn’t it be more appropriate 

for graphics (especially on the front cover) to be computer generated. 
The cover with index on front was more practical, with index for 

ready reference. 

Eid’s REM whose computer is to generate the graphics? What graphics? 


HELF GIVEnM 


Bill Tillick thinks he has discovered how to get the low cost 
processor, which he presented in the June Beeblet, to work on disc. 
The suggested amendments are: 


WORDPROC 


450 p%=41160 
598 p%=h1120 


RUF: 


290 S%=81202 

620 CALL &4420 
749.nCALL 81100 
215@,0CALL &1100, 


BILL adds, If anyone would like a copy of either the tape or disc 


version then I can be sent a tape, or a copy can be taken at the 
Wellington meeting subject to the availability of a machine." 
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CURSOR HELF 


Does anyone Know of a way of getting rid of the cursor? Great, 
everyone, including the User Guide Knows that. But everyone also 
Knows that the cursor re-appears when you do a Mode change. (Lloyd 
expects that, so he’s not worried about that either). The cursor also 
reappears when you activate the COPY cursor - ie press one of the 
arrow Keys when you are INPUTting or GETting a character, What is 
wanted is a way of getting rid of the cursor and not getting it back; 
even when the copying cursor has been activated! 


REM Don says that VDU23,0,11,0;0;0;8 nicely locks in the cursor for 
INPUTs. Doesn’t solve Lloyd’s problem. Something else can though: 


i@ REM cursor-less input 
24 MODE 4 


46 REM normal input 
o@ INPUT"First name" ,first? 


76 REM input without curser 
66 PRINTTAB(S,16); 
$8 second$=FN_input("second name"? 


116 REM print name 
126 ne SPC1 seconds 


158 DEF FN_input(prompt#) 

168 LOCAL repiy 

178 charewidth4=32:REM this assumes Modes i or 4 
188 MOVE (charuwidth“xPOS) , (1823-32xVP0S) 

198 YDUS 

260 PRINTorompt#; 

21@ INPUT" * reply? 

226 VDU4 

236 VDUS1 ,6,VPOS+1 

248 =replyt 


‘By using POS and VPOS to find out where on the screen you are, then 
MOVEing to where the text cursor is, linking the text cursor te the 
graphics cursor before printing-cut what would be considered the INPUT 
statement (prompts). See aisco an article titled "Move to Print" in 
this issue. The program above doesn’t interfere with VDUZ3 cursor 
removal - that still works before.and after using FN_input. 
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Rudolph & co. swimming to HZ 
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COMPUTER CERITRE 
DREGHORNM PLAGCE TOKQROF, 
P.O. Box 128 Phone (988)48-922 


We are agents for CLASRES of the United Kingdom. 


B-BASE ; The best value for money in a database. 
REPLICA-T1;: & Good tape to disc Transfer Disc. 
SHADOW: Backup those uncopiable tapes, 

THE KEY: Dise Utility. Edit and retrieve discs 


damaged or erased by a head crash. 


JOYSTICK UTILITY: Those programs that only use the 
Keyboard can now use Joysticks. Werks with any program 
BASIC ar M/Code that uses INKEY‘-) to detect movement. 


As we pass on to the user any savings tn Exchange Rates, 
prices vary therefore listed prices are only a guide. 


B-BASE $89~-00 SHADOW $346-38 
REPLICA-T1 $47-66 JOYSTICK $28-55 


THE KEY $52~-88 
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Marl LeAaG 
More news from Waiheke Island: 


Most of you will, I hope, recall John B.’s letter published in the 
October Beeblet. John has sent me a number of listings from the ELBUG 
magazine : "DANCE /L", "NIAGRA", "TV", "HARMONICS", "ELBUG", "XMAS", 
"LUNAR", "FOOT/B", "RUNNING/M", and "SOR/DANCE". The ones I have so 
far tested run on the BBC also (John - 1 think all Electron programs 
will rum on the Beeb, however some adjustments may be required to take 
account of the speed difference). Anyone interested in the listings 
could send me either a tape {or disc) plus $1-00 pip plus some 
contribution for the mag (size doesn’t matter), or $3-6@ plus mag 
contribution. For those regular contributors whese tapes I have 
accumulated, they should be on their way as soon as I have recovered 
from the combination of silly season and this edition. 


Back to John’s letter. He assures me, tongue in check, that as he is 
"not a man of letters.. Beeblet is indeed privileged to have a 
contribution from me", Well, I am always delighted to get letters, 
even if they don’t come from a "man of letters". John motes that 
getting rid of ones “junk” is a good idea - the problem is finding a 
buyer ( evidently “one man’s junk is another man’s joy" does not have 
an entirely universal application!}. He also admits that his Electron 
was originally destined for a somewhat younger associate of his later 
this month. Not only has the replacement (a Vic 2@) has rather dented 
his expansion plans, but "I have no doubt that he <the recipient ot 
oo Vic 2@> will talk me into doing a swap at a later date (much later 
ope)”, 


John would "aiso be interested to Know why people buy computers and ta 
what use they put them (1 mean personal computers)." So would 1! 
Judging from the numbers of people who have come to talk to me at 
work, usually just before they go overseas, & personal computer is THE 
thing tc have after the video recorder / player. However, a httle 
bit of probing {spouse with secretarial or literary = skills, 
invaelvement in club / society activities, massive record collectians, 
children and “education”, a frustrated desire to play arcade 
lel usually ordduces the necessary rationale in short order. 
erhaps some of our less cynical members may wish to comment! 


FEEDBACK 
Neil B. has résponded to my plea for a little more feedback..." Can't 


say I am over Keen on the new cover ~ it makes the magazine logk more 
like an ornithological publication in my opinion. Wouldn’t it be more 
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appropriate for graphics Cespectally on the front cover?) 
to be computer generated?" However, I think that the old 
cover was more practical, with the index in the front for 
ready reference.” Well Neil, this is precisely what I 
have been wondering about. Opinien seems divided on 
this, But so far a clear majority of people who have 
actually written ta me seem to }ike the new cover. I! 
suppose that people have to actually pick up the magazine 
and lack inside ta see what its about - perhaps an 
advantage where Beeblet is on display in a shop, IF the 
cover is sufticiently interesting to get pecple’s 
attention in the first place. I am alsa trying to create 
& umique identity for the mag (not necessary the one 
featured in "Broadsheet"!>, hawever, is it the right 
identity? 


Neil continues, "Anether beef now - I’m sorry that I’ve 
get very little cut af the last two issues - tao much 
chat, reviews and too many utility programs. What I want 
is mare listings of interesting / fun 7/7 applications 
programs and nat-taa-advanced hardware projects. (aqripe, 
moan... enuff)". Well, I Keep saying that the only way 
ta imprave the mag is to tell me what you actually want 
so thanks Neil. Of course, athers might like ta make 
some comment as well, before I i117 up the maq with 
listings..... ete. I am sure that everyone will have 
plenty af time to experiment with their machine over the 
Christmas break - how about dropping me a line with the 
results? 


Neil wrate his letter using Bill Tillick’s version of the 
wordprocessar from the Computing Today magazine, which he 
has "finally" managed ta adapt tea disc ‘see the help 
section for Bill’s mads.). Neil reports “I can safely 
report that it is infiately good value for money and 1 am 
very pleased with it." 


AMOTHER '/1I EL 


Alison writes “More an the September cartoon issue.. This 
is written by a 3@’st+ (But nat by much) “GIRL? and I 
would Jike you to Knew that not all women are offended 
about such issues. " The cartoon in question had to be 
lecked at again ta make sure nothing had been missed out. 

I feel that there are far more important issues to get 
upset aver and’that womenvare getting far too touchy on 
this particular type of subject." 
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Hmm. Well, I suspect that semewhere between “women” and 
"S24 of the population” there could be between one and a 
half to two million individually different reactians ta 
the cartoon. Its mice toa think that cur group has a 
representative sample... 


In reply ta your query Alison, the “other Anne’s" cartoon 
has not been published - last month’s cartoon, and the 
one jin this edition, were alsa contributed by Ricarde 
Delee. If you excuse a borrowing from one of the milder 
"Irish" Cinsert the nationality of your choice? jokes, 
ence people can overlook, but twice could cause problems. 


Alison and family do appear to appreciate the magazine - 
she speaks of a "real tussle” for it when it arrives. 
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ESCAPE the RETURN 
Type in #FX220,13, press return, and see what happens. 


RAMD OM ed 
F 


1@ REM Flashing stripes 
26 ON ERROR MODE7:STOP 
36 MODEG 

48 YDUS 

34 AA=155 

68 REPEAT 

746 ©=6X4%=RND 

SG *FX19 

948 CALL&FFF4 

168 UNTIL FALSE 

118 END 


Some strange effects can be seen if you attempt to program the ULA 
palette directly (instead of using VDU{9,...); especially when you do 
it at random as in the example above. 


If you want to Know what is actually happening, try reading "The 
Advanced User Guide", When you have understocd it, please explain it 
to me; preferably via an article in Beeblet. 


. RECURSIVE STRUCTURES . 
How do you represent a recursive procedure in a structure diagram? 
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BEEFPERS 


There once was a lady in Threep, 

Never thought SOUND could mean more than BEEP. 
‘Til FX two-eleven 

hit her VDU?; 

She’s the noisiest lady in Threep, 


VDU? is BEEP but... it can be WHOOP... or BLIP... or NOTE ... 
and ali via those FX calls not explained in the U.G. inot OS @.1) 


¥FXZII,n changes the channe! number, 

¥FX2Z12, changes the envelope number or ampti tude 
#FX2Z13,n changes the pitch 

#FAXZI4¢O,n changes the duration 


To make VDU? sound Tike SOUND1,-15,50,28 set up these 
definitions: 


*¥FX211,1 REM channel 6-3 
#FX212,128 REM amplitude -15 
#FX213,56 REM pitch = 36 
¥FX214,20 REM duration = 26 


The call that needs explaining further is #FX212,. The number to put 
after it is: (amplitude or envelope number minus 1)#8 

So to use envelope 2, 

REX? te (2 “1)#8 or HR KE E258 

for a volume (sorry, amplitude) of -i5 

SPXZ12¢-15-1)#8 or #PX242,(16#8) of #FX212,128, 


Type these commands into your computer 
ENVELOPE ,3,1,1,1,10,1¢8,1@,i126,6 "8,128, 126,126 
*¥FX211,1 

#FX2Z12, 9 

¥FX213, 185 

¥FX214, 168 

Now type in YOU? and listen, 

How about 

ENVELOPE2 ,18,4,0,8,6,8,8,34,10,-26 ,-246,108,126 
¥FX211,6 

*#FX212,8 

#FX213,5 

#FX2714,568 


With those two envelopes in your Beeb, type in: 


SOUND! ,1,145,188 listen... then... SOUND@,2,5,56 
sound the same as those Beeps did? 
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SIDEWAYS ROOF 
Steve W. Aucland. 


Ever wanted to write your own sideways ROM‘s?. I did, and with the 
assistance of the October Micro User and the Advanced User quide, ] 
finally succeeded. For testing such software some sort of machine 
code monitor is essential (I use ADE),and of course SOLIDISK sideways 
RAM makes it possible to test the code "in situ", i.e as a ROM. The 
ROM I created will do a screen dump to a STAR DP515 printer, in any 
mode {text-only in modes 3,6 and 7); using the command *DMP. If 
anyone’s interested in getting a copy of this; send an SAE and a 
cassette ta Steve Williams at 61 Disraeli Street, Epsom, Auckland. 
Send = if you want it blown into EPROM (te cover cost of 2764 and 
copying). 


SCREEM DUMP IN BASIC 


The following is a procedure which may be useful to include in any 
program where you want to dump a copy of the screen to a printer. The 
program revelves around the VDU 31 command (position curser) and 
OSBYTE CALL 135 (read character at cursor positien).Any non text 
characters will be printed as a space. 


1@REM SCREEN DUMP PROCEDURE 

29REM SFEVE WILLTANS 

S@REM WORKS IN ANY MODE, TEXT ONLY 

4BREM 

JBDEFPROCScreendump 

30 LOCAL M4 ,X4,SA,A4 

48 M/=?4355:REM N4=screen mode 

7@ RESTORE 240:REM set data pointer 

88 FOR X#=8 TO MA 

99 READ xmax,ymax:REM read max x,y 

198 NEXT 

418 YDU2:REM switch printer on 

128 FOR suby=8 TO ymax~i 

138 FOR subx=8 TG xmax-] 

148 YDU 3i,subx suby:REM position cursor 

138 AV=135:REM set accumulator 

148 SV=USR(MFFF4) AND &BOASFFRB:REM osbyte call 135 
478 SA=S4/256:REM pick out X register 

188 IF $4432 OR S4)127 THEN S¥=32:REM convert to space if not text 
178 VOU 2,S4:REM send character to printer 
208 NEXT 
238 VDUL,1B:REM end of line, so send linefeed 
228 NEXT 
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230 VDUS!REM switch printer off 
246 &@DATA 

88, 32,46 ,32,28,32,96,25,48,32,28,32,40,25,40,25 
258 ENDPROC 


L_oRDS OF TIME —- Level & 


The masters of Adventure games have cone it again. Having spent most 
of my Spare time for the last two weeks playing this game, I’m finally 
getting close to the solution (still only 325 cut of 1808 though). If 
you only ever play one Adventure game, then play one from Level 7; and 
please BUY a copy, we want to Keep these guys in business!. I don’t 
think these games are available in NZ, so you'll have to send to UK 
(229 Hughenden Road, High Wycombe, Bucks, United Kingdom). 


For anyone stuck in Colossal Cave, Snowball, or Lords of Time I can 
offer assistance (please send an SAE). 


GIVEeE-—-AWAYS 


Tony W in Napier advises us that those who have read The Micro User 
recently will Know that a new factory in Dublin will soon be producing 
BEC Micros. What they may not Know however, is that with each micro 
there is a free gift. Don’t rush, says Tony ~- it’s a dozen bottles of 
Twink!! 
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GCOLERI C 
There once was a colourful beastie, 
Went out for a walk in GCOQL3 
His steps out he retraced, 
To come home. We’re amazed! 
He’s invisible that beastie in GCOLS3! 


{8 MODE2 

20 YDUS 

38 GCOL3,! 

49 FOR 1% = @ TO 1980 STEP 108 
50 MOVE 1%,18 


66 PRINT"B’ 
a wai t=INKEY (38) 


NEXT 1% 
90 FOR 1% = 1800 TO @ STEP -189 
166 MOVE..14,106 
11@ PRINT'B* 
128 wai t=INKEY(5@) 
134 NEXT IY 
146 YDU4 
i5@ END 
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IN YALUA BLE UTILITIES FOR FHE 
BECMmMICRA, 


JEFF AUGHTON PAN BOOKS 
Reviewed by James Logie, Auckland. 


The title was enough to arouse my interest and after as long as could 
be decently spent locking at it without actually becoming a permanent 
fixture I decided that I would buy the book. After owning it for over 
a manth now I thought that it might be helpful to let others Know what 
I thought of it. 


Most experienced and/or wealthy micro owners will have either a ROM 
full of utilities or will have written their own routines to cope with 
the problems arising when writing programs of their own, trying to get 
their masterpiece functioning, or attempting to get other peopile’s 
efforts te work as expected. Being a peor novice hoping to write 
programs of his own this seemed a cheap way to learn while getting a 
wseful return for my outlay. As the author hints in his book every 
Tom, Dick and Harriet has their own favourite way of doing things and 
utilities abound, while mot as yet in the dime a dozen class (ROM 
based anyway), The monthly magazines usually have some sort of 
routine or utility so what advantage if any does this book have over 
what else is around 7? In its 234 pages there are 31 utilities. They 
range from a Block Memory Move on a user defined function Key to a 3@¢ 
line Music Processor; with mast of the rest being less than half that 
length. It seems pointless to make a list of all the routines and for 
various reasons I have not tried them all. 


For each utility the author gives a description af the program, a how 
to use it section and a listing Gin a large easy to read type). Then 
follow how it works, what the procedures do and the variables used, A 
final section on extensions gives suggestions as to how the program 
could be modified or extended with in Some cases a practical example. 
However with the amount of information given extension or alteration 
of the main listing should not prove too difficult; and this for me 
was one of the main reasons for buying a do it yourself utility Kit in 
the first place. The author seems to have found a good balance 
between assuming that the reader does mot Know very much about 
computing but is not completely ignorant. 


Having recently bought a disc drive I have made good use of a utility 
to download the programs after loading from disc; and have also used 
one that allows direct access to the disc to examine and edit, if 
required, the information stored there. As the author points out it 
is a facility to be used with care. but invaluable if you have just 
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accidentally #WIPEd a program ar have other information 
there which otherwise you have no access to. 


A&A similar program allows viewing and aiteration af the 
memory in the machine. It is interesting just to seroll 
through the memory without attempting ta alter anything. 
See hew Acorn write BASIC, See what you have just 
written. See yourself looking at what you have just 
written. For writing programs there is a Graphics 
utility which allows graphics ta be drawn on the screen, 
colours changed prior to and during drawing and a record 
centinuousty presented of the current position. 

Character Creator Z29x8ipixels), can colour each 
individual pixel in full Mode 2 colours, show the 
creation in ail its glory, allow alteration, show the VDU 
Statements necessary to program it and afso save it. 


Other utilities assist in writing programs, replacing 
strings, condensing programs, screen save and printer 
memory dump. : 


I have had a lot of fun using some of these routines, 
have learnt something about the BBC micro and intend to 
make more use of the programs I] now have and those that I 
have not as yet attempted. When I become more familiar 
with what I am.doing I expect to be using the suggestions 
in the book to extend and modify the programs to suit my 
heeds, 


To sum up, here for the price of a cassette game, In a 
readable bock are 3@ plus pragrams that could amuse, 
assist and perhaps inspire you in your conflict with your 
micro, 


P.S, This review was written with the aid of Bil} T’s 
"cheap" wordprocessor, Thank you Bill T. (It loaded 
perfectly into Wordwise toa! -Ed.) 


TROUBLED ADVENTURER 
Diarmid F. would like to Know “how to stop the Zombie from wasting me 
when getting the trident ie. where are the hammer and nails." 


I understand that it might help if you explore the area between the 


blobs of Jelly ‘and the yellow’ room more thoroughly. On the other 
Sand, it may not! Happy adventuring - Ed. 
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EINSTEIN SCIENTIFIC LINITEB 
Ef? Willis Street 
WELLINGTON. 
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CHECK EINSTEIN'S EXTENSIVE RANGE OF PRINTERS 
AND SOFTWARE FOR THE BBC & ELECTRON 
MICROS. 


WELLINGTON 

[77 Willis Street. Phone Raju, Michag! or Malcolm 851055 or 644353. 
PALMERSTON NORTH 

154 Brosdway Averiue. Phone Richard 64700. 

NEW PLYMOUTH 

Corner King & Egmont Streets. Phone Bill ar Sally @5526. 
CHRISTCHURCH 

Shop 41, (st floor, Cashfields Mail Phone Mike 66442. 

HAMILTON 

inside OIC, Garden Place. Phone Maxine G1969, 


SCIENTIFIC LTO 


~ at on 
a, 


% Sep 


The computer world made simple. 
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THANKS FOR THE MEMORY 
David Fung 


To the new and prospective members of the user group: A most 
important reason why you should join the croup is that by talking to 
other members about your problems; helpful hints, clues and flashes of 
brilliance often restore your sanity and happy relationship with your 
Beeb/Acorn. The other advice I have is to set yourself a definitive 
task, it would not matter how simple it is, but persist with it until 
the end. You will be pleasantly surprised how much you do learn in the 
Drocess. 


l had little idea about computer and programming when I joined the 
group. IJ had the crazy notion that I would like to develop a Chinese 
Word Processor. Thanks to the tips and advice from the other members 
like Gavin, Anton, Neil, Steven and others I have achieved my 
objective in a much shorter time and more pleasurable then otherwise. 


One of the major problem I had was the limited memory in the Beeb and 
externally in the discs. This is common to any applications using 
indices and files, | would like ta share my experience with the not so 
experienced members in recognition to the help and encouragement given 
to me so generously by the OLDIES. 


STRINGS HAVE STRINGS ATTACHED 


If you want to set up an index of say {8666 mames and their 
corresponding record numbers, the simplest way is to reserve Space by 
the DIM command, ie, DIM name$(idee), record%(idee@), Let’s say the 
names are each i@ characters long. You would need ii bytes for each 
name$. Each record% would alsa need 4 bytes. So you would need 


1000 x i1 + 1000 x 4 = 15006 bytes 
The computer has to Keep track of where these strings are stored so it 
sets up its own index of STRING INFORMATION BLOCKS and there is ane 
for each string. Each block uses 4 bytes. So the computer grabs 
100@ x 4+ 1000 x 4 = 000 bytes 

You have used up 15000 + 866¢ = 23000 bytes or 22.46K of memory. This 
will leave you with about 2.29K in mode 7 which is the only mode you 
can work in. 


The way to get around this is to do away with STRINGS $/% 
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Let‘’s reserve {900 x 18 bytes for the names and we can 
use 2 bytes for each record number if the number is 
smaller then 65536. The total memory requirement is 1668 
x 16 + 1808 x 2 = 128606 bytes made up of 1688 blocks of 
iz bytes, 


Now go ta your computer and switch it on ¢ if itt was on, 
switch it off then on.) You are now in mode /?, 


Type P.~¢ HIMEM - 12886) ,~HIMEM 
The computer will say 4D26 7CG8 
Type HIMEM = &4D1F 


The memory lacatian between 4D20 and 7CHE Is now 
reserved for your index. Yau can *#SAVE thie as an index 
file by type in 


*SAVE INDEX 4C28 7C6OS 
The file contains 12688 zeros at the moment. 


You can now start writing to your index with the 
following programme 


68 records = | 

86 begindé = &4022 REN. begining ef index 
138 INPUT’" PLEASE ENTER NAME " named 

178 theginé = names REM. copy name$ there 
186 begind?1@ = recordé MOD 236 

$98 beqindé?ii = records DIV 256 


begin% is the label for the first byte where you start 
to write a name in the index 

begin%71@ is the 1th byte from the first one therefor 
the iith byte, in which you put the REMAINDER of (record’ 
divides by 254) 

begin% 711 is therefor the next, the i2th byte for the 
WHOLE NUMBER of (record®% divided by 256) 


To make sure that your mames are not longer then 1? 
characters add the following lines: 


128 REPEAT 
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14@ IF LEN¢inamed)? > 18 PRINT’ "NAME TOO LONG" 
1&@ UNTIL LEN¢name#? < 11 AND LEN(name#? > @ 


To make this operation automatically repeat until you 
want to quit type these in: 


148 REPEAT 

2B8 beginA=beginé+12 REM, next block of 12 
218 record{ = pecord/ + 1 REM. next record number 
246 UNTIL records = 168i 

258 PRINT’? FABCI8)® INDEX 2S FULL" 


You can quit by pressing ESCAPE but on RUN again you 
would net Know where you were up to and the programme 
would start from the beginning with record 1. So you 
will need te write down somewhere where you were, not on 
a peice of paper, but in your index, say in the first two 
bytes of the index? 


48 ON ERROR 7&4026 = records MOD 256 : 7&4DZi = records 


DIY 256 

68 record = 74020 + 784021 *% 254 REM, reads next 
records 

88 begins = &4022 + (records - 1) #12 REM. works out 
next block 


96 IF pecord{ = 1881 THEN PRINT * JNDEX 15 FULL" : END 


You would also want to save whatever you have put in the 
index, so: 


49 ON ERROR PROCsavedata 


278: 

288 DEF PROCsayvedata 

298 4 = pecordé MOD 254 : M71 = recordé DIV 256 
386 REPEAT 

316 INPUT’*DO YOU WISH TO SAVE INDEX "At 
326 UNTIL A’ = "Y" OR AS = *N" 

330 JF A$ = "N* THEN END 

348 ¥S5AVE INDEX 4026 7068 

358 END 

368 ENDPROC 


Now List your program and Bingo you have an” INDEX MAKER 
", an INDEX of £800 blocks of 12 bytes and you still have 
i3K of memory for you to access "STRUCTURALLY", 
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Type in the following to canplete the programme and te 
make it more friendly and to tidy up the loose ends, then 
save the whole fisting under a file mame eg, "I.MAKER” 


18 MODE 7 

28 P.TABCIG, 18); "INDEX MAKER" 

38 WAIT = INKEY$4268) 

58 M = &4028 

76 IF recordy = 6 THEN recordé = } 

118 CLS 

{68 PRINT’ record/,* * names 

228 PRINT’‘" PRESS ‘ANY KEY TO CONTINUE " 
238 KEYHIT=GET 

268 END 


Now run the program and put in some names. If you want to leave off 
and come back next day to put more names im, it would make life easier 
if the programme would #LOAD the index for you and reset HIMEM at the 
Same time, Also you can sneak in an extra 1.25K memory if you reset 
PAGE from &1989 to &146@. You can create a "LEAD" to do that and 
"CHAIN" “IT.MAKER" for you, 


$0 REN, "LEAD" to chain "] MAKER" 
28 HIMEM = &4DiF 

38 PAGE =&1488 

48 *L 04D INDEX 

38 CH. "J MAKER" 


Save that under the file name "LEAD" 


With the indulgence of the editor I shall in subsquent articles she: 
you how to read your index, how to sert the names in alphabetical 
order, how to insert a name in the already sorted index and how to 
write to and read from the files related to the index in the most 
memory sparing ways. 


Meantime why don’t you set yourself a task to beat me to it. I am 


sure the editor would be please to receive your effort. Perhaps he may 
even offer a prize for the best masterpiece! 


Hint: 
You cam have your cake and eat it too. Tf you use an extra byte for 


your name and poke 13 into it then you can manipulate the names as 
hameg$s and get away with no STRING INFORMATIOM BLOCKS because you 
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should Know where the names are, 


If you are confused then you should start asking 
questions. That is what the user group is for. 


Best wishes! 


CLASSIFIED ADS 


FOR SALE: 

{ MPI Disc Drive 

$8 Tracks Double Sided 

Has recently been completely overhauled, 

Fully cased and all cables included 

Price $550-66 ONO 

Write te John 49 Coronation Road; Morrinsville 
Or phone MOV 6695 {after opm) 


FLOPPY DISC CONTROLLER 
Is there anyone with a 271 FLOPPY DISC CONTROLLER which they do not 
need, or who Knows where on can be obtained in N.Z. Willing to pay up 
to $120-048. 
Please call PATRICK at 367-722 or write to 


PATRICK DUGHTON; 
4 PIKARBRE STREET, 
TITAHI BAY; 
WELLINGTON 


MICRO COVERS 
Designed to fit the BRC micro, Attractive opaque reinforced plastic, 
$5-56 posted. To lain, Box 26078, Epsom, Auckland 3. 


DEALS AND DISCOUNTS 
Send stamped addressed envelope for details of the deals negotiated by 
the Wellington Brancn for UG members. Please mark your request for 
the attention of Jill Armstreng, C/O the UG Box 9592 Wgtn, 


CASSETTE TAPES 
Ci@s, boxed, leaderless - available from the UG in multiples of 2@ - 
$25-08 plus §2-0@ pap, 


FLOPPY DISCS 
3M Brand 5 i/4" DSDD discs - available from the UG ex-stock in 
(cardboard) boxes of 10: $55-00, which includes pap. 


.w4ND ONE FOR THE ROAD... 
Do we have any FIAT fanatics in the group? Well, the Editor has this 
very quick 124 160@ Sports for sale... 
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Roberts Printing Co.Ltd. 


Telephone 846 472 850 831 PO Box 6074 WALTER STREET, WELLINGTON 


(Off Vivian Street batween Cuba and Willis Streets) 
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Healt OF FAME 
PUBLISHER: GAME HISCORE SCORER 
Acorn Aviator 158 Kendal 
Countdown 22/0 Tim R. 
Elite Average K. Finlay 
Hopper 27,196 Jenny B. 
Meteors 24,696 Duncan’s flatmate 
Monsters 93,566 Linsay F, 
Starship Command 3,497 Robert WN. 
ARF Chuckie Eqg 324,216 Mike D. 
AF Frenzy $67,915 Mike OD. 
Pak F Cylon Attack $1,668 Robert N. 
Alligat. Bug Blaster 37,642 Steve W. 
Amc or Fortress 68,888 Joanne C, 
Badger Lunar Lander 245,767 Puncan’s flatmate 
Dr. Soft %7477 265 Steve W. 
Gor f 18,448 Steve W, 
FG Seft. Mutant Defender 6,766 Steve W. 
G.C.F. Mental Arithmetic 2460 8= Gavin F. 
Level Colossal Cave 487 Steve UW, 
Dungean Ady. 336 Anne et al 
Prog.Pow Danger UXBiLyl 1) 546,798 WMike’s daughter 
Felix the Factory 7,886 Dianne $ 
Sup.Soft Alien Dropout 24,280 David E. 
Q*BERT 36,268 Dianne S. 
Roadrunner 78,668 Lois S. 


Healt OF FAME 
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USER GROUP MEETINGS 


AUCKLAND:-meets 2nd Wednesday of the month, 7.3@pm, Conference Rooms, 
Auckland Teachers College,49 Epsom Ave Epsom 
ph Dave 770-639 x Sig(bus) or Kerry 675-355. 
CHRISTCHURCH:-fortnightly workshops, Monday 6.¢@pm at Hagley High 
School. ph. Michael 582-267, 
HAMILTON:-last Thursday of the month 4.45pm Waikato Tech B-block 
staffroom. Ph. Peter, Hamilton 392-300 » &97(bus) or 
Alison; Morrinsville 6495. 
HAWKES BAY:-Alternative months Hastings & Napier. Contact Kendail 
sas 435-624, Bob Taradale 446-955, Mitch Hastings 
mo De 
IN VERCARGILL:—Phone Evan 330-444 Invercargill 
Paimerston North:~Phone Tom Skinner #3-089 (wk) 
TAUPO:-Contact Dave 84-215. 
TAURANGA:-every second Wednesday. ph. Chris & Jane 65-075, 
TIMARU:- Meetings to be arranged in the first week of each month. 
Contact Chris Stone ph. Timaru 60394 
WELLINGTON:-meets LAST Thursday of the month, 7.3¢pm, Correspondence 
School staffroom (ist floor), Portland Cres, Thorndon. 
ph. Anton 286-289 or Warren 707-065, 
OTHER CENTRES:- let us know and we will publish details here. 


THE NEWSLETTER: 
CONTRIBUTIONS:-most welcome. Listings should be sent in on tape or 
disc.(Tape - 2 copies,one at 380 baud please). A 3c stamp 
gets your tape / disc returned too, Please include written 
explanation of listing; text only material welcome too. 
DEADLINES:- For a particular issue, the last day for material is the 
last day of the month prior te publication. 
ADVERTISING:- Rates are $29 per half page, deadline as above. 
Copyright (c) THE BBC/ACORN COMPUTER USER GROUP OF NZ INC. 
Published monthly except January and mailed to financial members. 


MEMBERSHIP: 
Membership of the users group is on payment of an annual subscription 
from April to March. For the 1984/5 year it is: $30.00, plus a $5.00 
joining fee for mew members, plus $5.0@ far AucKland & Wellington 
members as @ local bramch levy, which entitles attendance at meetings 
as detailed above. Renewing members get ali back issues of the 
current year; New members also get back issues te v.i #1 Jan ’o4, 


THE ACORN/BBC COMPUTER USER GROUP OF NZ INC 
| P.O.Box 9592 
Wellington 


Reproduced by ROBERTS PRINTING Co. Ltd, Wellington. 


Pak et eee ce emg cr cs crs cs ere rr re reer eee weal id ee ee ee eee ee ee ee ee ee ee ee ee eee ee ee ee eee 


